Как создать на форме новый элемент при нажатии кнопки

← →
MikeFW (2002-08-02 10:33) [0]

Уважаемые Мастера,
подскажите, пожалуйста,
как мне на форме создавать новые элементы (Button, Label), допустим по нажатию кнопки. Т.е. не делать из не видимых в видимые с помощью свойства Visible, а именно добавлять их на форму с заданием координат расположения?
Ну и как их удалять соответственно?

← →
MBo © (2002-08-02 10:40) [1]

delphi.vitpc.com
hello world
"Жизнь и смерть в режиме Run-Time"

← →
Кузнецов (2002-08-02 10:41) [2]

Создавать примерно так

If FindComponent("Form2") Is TForm2 Then Form2.ShowModal
Else
Begin
Form2:=TForm2.Create(Self);
Form2.Top:=Form1.Top+Form1.Height;
Form2.Left:=Form1.Left;
Form2.Width:=Form1.Width;
Form2.Height:=Form1.Height+2;
Уничтожать есть много способов
можно примерно так

procedure TForm2.FormClose(Sender: TObject; var Action: TCloseAction);
begin
If Canclose_=True Then Begin
Action:=caFree;
Form2:=nil ;
End
Else Action:=caHide;
end;

← →
Кузнецов (2002-08-02 10:42) [3]

про жизнь и смерть абсолютно правильно подмечено

with tLabel.Create( self {прописывается хозяин - кто будет удвлять объект, либо nil если сам} ) do begin // Устанавливаешь характеристики: Font, Alignment и т.д.
SetBounds( {позиция на экране относительно родителя} );
// Обязательно прописываешь родителя к примеру Form1
Parent := Form1;
end;

Как создать на форме новый элемент при нажатии кнопки Найти похожие ветки