Динамическое создание компонентов

← →
Yustas (2004-05-09 19:39) [0]

Как динамически создавать компоненты? В VCL, чтобы создать, например, новый список я делал так:

procedure new_list(name:string);
var
new:TListBox;
begin
new:=TListBox.Create(form1);
new.Name:=name;
new.Parent:=form1;
end;

В KOL это не проходит...

← →
z007 (2004-05-09 22:24) [1]

Типа:
Function new_list(name:string):pControl; begin Result:=NewListBox( Form1.Form, [loNoIntegralHeight ]).SetPosition( 134, 26 ); Result.Add(name); end;
Может быть, понадобится чтот-то сделать с Parent, чтобы ListBox стал виден.

Чтобыдинамический контрол сьал виден на экране ему ещё Show надо сделать.

Динамическое создание компонентов Найти похожие ветки