| BIOACE | Дата: Воскресенье, 13.11.2011, 16:35 | Сообщение # 1 |
|
BIOACE
Группа: Администратор
Сообщений: 105
Награды: 4
Репутация: 1
Статус: Offline
| Сегодня я тебе расскажу, как можно программно создать форму, вместе мы сделаем лёгкий пример, надеюсь план понятен?! Тогда приступим! Если ты не знаешь о зачем это надо, то поясню, иногда заранее не известно сколько форм будет в программе это возникает в тех случаях когда пишешь программу, ну скажем чат для локальной сети... и надо сделать так что бы каждое личное сообщение выводилось в новом окне т.е в в новой форме.
Ну что поехали
Для начала создаем новый проект и кидаем на форму кнопку (button). Теперь создадим еще одну форму, жмем: File => New => Form
Сделали?.. Тогда создаем обработчик событий (OnClick) на кнопке и в нем пишем:
Code Form2:= TForm2.Create(Application);
Form2.Caption:= 'Новое сообщение';
form2.Show;
Запускаем проект и Delphi выдает нам окно, в котором нажимаем yes. ( Если окошко по каким либо причинам не появилось то после ключевого слова implementation допиши вот такую строчку)
Запускаем еще, теперь при каждом щелчке по кнопке будет создаваться новая форма.
Вечный майор D~DefenD
|
| |
| |
