Вниз
Скачать: CL | DM;

Создание новой формы с компанентами   Найти похожие ветки 

 
vajo   (2003-04-30 09:13) [0]

Подскажите, как сделать. Необходимо чтобы при нажатии на кнопку создавалась новая форма с набором компанентов.


 
Calm ©   (2003-04-30 09:16) [1]

Нужно испрозовать репозиторий форм. См. команду Add To Repository и т.д.


 
jack128 ©   (2003-04-30 09:18) [2]

А эта форма с компонентами в дизин тайм уже описана?
Если да, то

procedure TForm1.Button1Click(Sender: TObject);
var form2 : Tform2;
begin
form2 := Tform2.Create(nil);
...// Делаешь с формой, что те нужно
form2.Free;//уничтожаешь форму
end;



 
Calm ©   (2003-04-30 09:19) [3]


> Нужно испрозовать репозиторий форм. См. команду Add To Repository
> и т.д.

Уф-ф... Абсолютно не в тему высказался...


 
evvcom ©   (2003-04-30 09:19) [4]

Создаешь в дизайн-тайм форму, но в опциях проекта из auto-create forms ее убираешь. В обработчике клика по кнопке пишешь MyForm := TMyForm.Create(Application); или как в исходнике проекта Application.CreateForm(TMyForm, MyForm); с предварительной проверкой if not Assigned(MyForm) then



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.008 c
8-34512
jee
2003-01-31 16:15
2003.05.12
Тоновый набор


3-34323
Sergey
2003-04-21 13:24
2003.05.12
Midas событие ReconcileError ?


1-34500
anbezr
2003-04-28 13:23
2003.05.12
Недопустимый дескриптор окна


14-34584
Godness
2003-04-23 20:12
2003.05.12
сжатие данных ...


14-34594
Дмитрий К.К.
2003-04-24 06:19
2003.05.12
Именинники 24 апреля




   Наверх