Delphi уроки: Динамически (программно) создаем новую форму.

Опубиковано: 31.08.2008 г., автор: , просмотров: 75453

Delphi уроки: Динамически (программно) создаем новую форму.

Сегодня я тебе расскажу, как можно программно создать форму, вместе мы сделаем лёгкий пример, надеюсь план понятен?! Тогда приступим! Если ты не знаешь о зачем это надо, то поясню, иногда заранее не известно сколько форм будет в программе это возникает в тех случаях когда пишешь программу, ну скажем чат для локальной сети... и надо сделать так что бы каждое личное сообщение выводилось в новом окне т.е в в новой форме.

Ну что поехали

Для начала создаем новый проект и кидаем на форму кнопку (button). Теперь создадим еще одну форму, жмем: File => New => Form
Сделали?.. Тогда создаем обработчик событий (OnClick) на кнопке и в нем пишем:

Form2:= TForm2.Create(Application);
Form2.Caption:= 'Новое сообщение';
form2.Show;

Запускаем проект и Delphi выдает нам вот такое окно, в котором нажимаем yes. ( Если окошко по каким либо причинам не появилось то после ключевого слова implementation допиши вот такую строчку)

uses Unit2;

динамическое создание формы delphi

Запускаем еще, теперь при каждом щелчке по кнопке будет создаваться новая форма. А вот как это получилось у меня:

программное создание новой формы в delphi

На сегодня все, Встретимся в следующем уроке.

P.S. Не забываем подписываться на бесплатную мультимедийную рассылку.
Форма для подписки расположена с права и с лева.

До встречи DelphiExpert.ru !!!

Последние из рубрики

Антоха 19 Aug 2010 в 00:00 #

2 "Привет из Челябинска": я делал вот так
.......................................................
// создаем кнопку
ExForm.exButton := TButton.Create(ExForm);

with ExForm.exButton do begin
Parent := ExForm; //указываем предка
Left := 200; // размеры и заголовок
Top := 100;
Height := 25;
Width := 75;
Caption := ′Extract Files′;
end;
//Отслеживаем нажатие
Method.Code := @TEForm.ExButtonClick;
Method.Data := ExForm.ExButton;
ExForm.exButton.OnClick := TNotifyEvent (Method);
.......................................................
Это просто делал архиватор работающий с 7z.
Если нужно код могу прислать, а админ посмотрит нужно ли такое в уроки выставлять или нет.

Привет из челябинска 05 Aug 2010 в 00:00 #

Как добавить элементы в созданную динамически форму?

Гость 01 Aug 2010 в 00:00 #

А можно програмно консоль открыть

NarKoZ 26 Jul 2010 в 00:00 #

уже нашел =)

NarKoZ 25 Jul 2010 в 00:00 #

Как получить доступ к остальным созданым екземплярам???

Delphi уроки: Динамически (программно) создаем новую форму.

Delphi уроки: Динамически (программно) создаем новую форму.

Похожие материалы

Последние из рубрики

ОтменитьДобавить комментарий