-
Основы Delphi
- Основы программирования на Delphi
- Компоненты Delphi. Начинаем писать свои первые приложения на Delphi
- Основные принципы программирования в Delphi. Начинаем программировать самостоятельно
- Delphi и Microsoft Word
- Delphi и Microsoft Excel
- Delphi и Microsoft Access
- Delphi и OpenOffice Writer
- Delphi и OpenOffice Calc
- Создание игр на Delphi
- Игра Пристрели птичку
Delphi и MSOffice
Delphi и OpenOffice
Delphi и Интернет
Delphi и игры
Delphi Android
Школа программирования Delphi
Портал DelphiSchool является бесплатным проектом, обеспечивающим пользователям быстрый и легкий доступ к урокам программирования на Delphi. Сайт позволяет научиться программировать на Делфи любому, кто хочеть писать свои программы, игры, Android приложения, программы для MAC OC или IOS. Кроме уроков Delphi и статей Delphi, на сайте доступны также и видеоуроки. Практически к каждому уроку, пользователю доступен исходник, изучив который, он сможет наглядно посмотреть как работает та или иная программа, написанная на Делфи. Кроме того мы постараемся прилагать к каждому материалу (статье, уроку, видеоуроку) файлы Delphi, которые будут помогать изучить предоставленный материал.
Каждый кто решил написать свою программу, создать свое приложение, научиться программировать и т.д., найдет на DelphiSchool статьи Delphi, уроки Delphi, видеоуроки Delphi, исходники Delphi, файлы Delphi, изучит компоненты Delphi, посмотрит Delphi примеры и многое другое абсолютно бесплатно. Все о Delphi программировании теперь собрано на одном сайте!!!
| Главная » Уроки Delphi » Основы Delphi » Компоненты Delphi. Начинаем писать свои первые приложения на Delphi |
 Компонент TPanel имеет вид панели. Находится компонент TPanel на вкладке Standart палитры компонентов. На этом компоненте, так же как и на форме, можно размещать другие компоненты (Например: кнопки, текстовые поля, многострочные текстовые редакторы, флажки, переключатели и т. д.). Если разместить на панели компоненты, а затем передвинуть эту панель, то и все компоненты, находящиеся на ней передвинутся. Компонент Panel может выглядеть по-разному. Давайте создадим программу и посмотрим, как может выглядеть панель. Создаем новый проект и устанавливаем на форму два компонента TPanel. Для первой панели установим свойство Align равное alLeft, а для второй – alRight. Теперь изменим свойство Caption для первой панели на "Первая панель", а у второй - "Вторая панель". За внешний вид у компонента Panel в Delphi отвечают свойства: BevelInner и BevelOuter. Поэтому давайте создадим обработчик события при котором мы будем менять эти свойства, чтобы наглядно посмотреть какой вид они будут принимать. Предлагаю создать для первой панели (Panel1) обработчик события OnMouseDown и прописать в нем следующий код: Код procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin Panel1.BevelOuter:=bvLowered; end; Обработчик события OnMouseDown срабатывает при нажатии мыши, поэтому, когда будет нажата мыша на панели, то эта панель изменит свой вид. Чтобы вернуть прежний вид панели, давайте создадим обработчик события OnMouseUp, который будет срабатывать, тогда, когда мы отпустим нажатую кнопку мыши и напишем следующее: Код procedure TForm1.Panel1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin Panel1.BevelOuter:=bvRaised; end; Теперь, если запустить программу и нажать на первой панели кнопку мыши, то она изменит свой вид, а если отпустить кнопку мыши, то панель примет исходный вид. Давайте теперь создадим нечто подобное и для второй панели (Panel2). Создаем обработчик события OnMouseDown и OnMouseUp для второй панели и прописываем следующее: Код procedure TForm1.Panel2MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin Panel2.BevelOuter:=bvLowered; Panel2.BevelInner:=bvRaised; end; procedure TForm1.Panel2MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin Panel2.BevelOuter:=bvRaised; Panel2.BevelInner:=bvLowered; end; Так при нажатии кнопки мыши на второй панели, мы делаем ее вогнутой, а затем, отпуская кнопку мыши, возвращаем ее исходный вид.  Рисунок. Пример работы с компонентом TPanel в Delphi К уроку (статье) Delphi и TPanel. Пример работы с панелями в Делфи прилагается исходник, посмотрев который, вы можете ознакомиться с полным исходным кодом программы и посмотреть как работает созданная программа. Исходный код сопровождается комментариями, благодаря чему вы сможете легко в нем разобраться. Но я настоятельно рекомендую делать все самостоятельно. Так вы лучше и быстрее усвоите то, о чем говорилось в этом уроке Для того чтобы получить возможность скачать исходник Delphi к этому уроку, необходимо посетить сайт рекламодателя. После этого, появится ссылка на исходник Delphi к уроку Delphi и TPanel. Пример работы с панелями в Делфи | |
Добавить Delphi и TPanel. Пример работы с панелями в Делфи в закладки: |
| Диалоговые окна в Delphi. ShowMessage, MessageDlg, MessageDlgPos, InputBox и InputQuery |
| Delphi и RadioGroup. Пример работы с группой компонентов RadioButton в Делфи |
| Основы работы с MS Word. Создание, открытие, сохранение и закрытие документа Word с помощью Delphi |
| Delphi и TButton. Учимся работать с кнопкой в Delphi. Часть 2. События кнопки |
| Delphi и ComboBox. Пример работы с ниспадающими списками в Делфи |
| Delphi и TEdit. Пример работы со строками ввода в Делфи |
| Константы в Delphi. Объявление констант в Делфи |
| Управление циклами в Delphi. Операторы Continue и Break. |
| Delphi и CheckBox. Пример работы с CheckBox в Делфи |
| Delphi и TPanel. Пример работы с панелями в Делфи |
| Всего комментариев: 0 | |