Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Создать Form в Runime ...


Oleg_EM ©   (2002-03-05 16:53:00) 

Добрый день !
Появилась необходимость создавать формы диалога для отчетов
в runtime, т.е. шоп перед выполнением можно было ввести нужное кол-во данных
Примерно так:
var Form : TForm;
begin
Form := TForm.Create (Self);
Form.parent := nil;
Form.left := 0;
Form.width := 200;
Form.Top := 100;
Form.Height := 150;
Form.Caption := "Диалог";

а вот дальше... как разместить неограниченное кол-во Edit box
Label и прочее ? c button тож все понятно (минимум чтоб mrOk, mrCancel возвращали)
подскажите в каком направлении рыть ...


Sasha9   (2002-03-05 17:13:00) [1]

edit1.parent:=form;


lipskiy   (2002-03-05 17:12:00) [2]

Можно динамическим массивом:
ArEd : Array of TEdit;

for i:= 0 to length(ArEd)-1 do
ArEd[i]:= TEdit.Create(...);


Наверх

Титульная страница Поиск, карта сайта Написать письмо