Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Вниз

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


Oleg_EM   (2002-03-05 16:53) [0]

Добрый день !
Появилась необходимость создавать формы диалога для отчетов
в 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 возвращали)
подскажите в каком направлении рыть ...



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

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

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



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

edit1.parent:=form;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.21;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.017 c
3-66778           SAN                   2002-02-14 18:46  2002.03.21  
MIDAS + IB


1-66899           Alex Sm               2002-03-06 10:34  2002.03.21  
control characters


3-66757           Ольга                 2002-02-21 13:54  2002.03.21  
SQL


4-67038           AlexGO                2002-01-21 10:59  2002.03.21  
File sockets under Win2000


4-67060           michael_B             2002-01-11 18:31  2002.03.21  
как проиграть *.wav без использования компонентов(MediaPlayer).