Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

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

MikeFW © (2002-08-02 10:33:00)
Уважаемые Мастера,
подскажите, пожалуйста,
как мне на форме создавать новые элементы (Button, Label), допустим по нажатию кнопки. Т.е. не делать из не видимых в видимые с помощью свойства Visible, а именно добавлять их на форму с заданием координат расположения?
Ну и как их удалять соответственно?

SaS13 (2002-08-02 10:45:00) [1]
withtLabel.Create( self {прописывается хозяин - кто будет удвлять объект, либо nilесли сам} ) do begin// Устанавливаешь характеристики: Font, Alignment и т.д.
SetBounds( {позиция на экране относительно родителя} );
// Обязательно прописываешь родителя к примеру Form1
Parent := Form1;
end;

Кузнецов (2002-08-02 10:42:00) [2]
про жизнь и смерть абсолютно правильно подмечено

Кузнецов (2002-08-02 10:41:00) [3]
Создавать примерно так

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;

MBo (2002-08-02 10:40:00) [4]
delphi.vitpc.com
hello world
"Жизнь и смерть в режиме Run-Time"

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »