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

Создать 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;



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

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



Память: 0.45 MB
Время: 0.008 c
1-66810
Stexen
2002-03-04 19:45
2002.03.21
Захват изображения


1-66896
Song
2002-03-05 10:38
2002.03.21
мне нужно послать Ctrl+A через WM_CHAR (или ещё как-то). Через SendMessage там есть последний параметр lKeyData.


3-66746
skiph
2002-02-12 09:03
2002.03.21
INSERT в MS SQL7.0


1-66837
dolmat
2002-03-06 12:22
2002.03.21
печать подобно DOS


4-67041
Nigma
2002-01-12 13:30
2002.03.21
Privileges !!!




   Наверх