TWinControl.Cоздание в runtime

Нул 17.03.2004 - 14:09 | Господа программисты, подскажите пожалуйста как создовать наследников TWinControl'a (кнопки, эдиты) в режиме выполнения... Например у меня есть форма на ней одна кнопка, после её нажатия хочу что б появилось n-ное кол-во edit'oв... P.S.: надеюсь хоть кто-нибудь меня понял...
NTFS 1 - 17.03.2004 - 14:47 | Вроде так: var Edit1:TEdit ; Edit1:=TEdit.Create(Form1) ; with Edit1 do begin Parent:=Form1 ; Left:=20 ; Right:=30 ; Text:='Новый компонент' ; // И другие свойства end ; Для появления нескольких - используй массив. Удачи.
Mr Null 2 - 17.03.2004 - 17:57 | Спасибо! Пробовал до этого: procedure TForm1.Button1Click(Sender: TObject); var new: TEdit; begin new := TEdit.Create(Self); new.Left:=5; new.Top:=5; new.Text:='привет'; end; после этого добавил new.Parent:= Self; - всё заработало... Ещё раз спасибо!

>>