Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Вниз

Избитый! 


Кандыль   (2001-12-24 21:14) [0]

Буду краток. Нажимаю на кнопку на форме, а на ней появляется новый компонент TEdit или TLabel с заданнымы параметрами(имя размер и т.д.)!
За ранее спасибо!



Фе   (2001-12-24 21:23) [1]

Будем и кратки.
var
btn : TButton;
При нажатии
btn := TButton.Create(Self)ж
btn.Parent := Self;

Или вместо Self имя компонента-родителя.

Об остальном - догадаешься сам при изучении методов, свойств и событий создаваемого компонента.



Кандыль   (2001-12-24 21:36) [2]

Извини конечно, но код не идет! И во вторых мне нужна не кнопка, а текст.



Кандыль   (2001-12-24 21:42) [3]

btn.Parent -- ??? Что это?



Фе   (2001-12-24 22:02) [4]

btn.Parent - это родитель твоего компонента, т.е. на каком компоненте
создается твой компонент.
Для случая Self родителем явл-ся форма и она отвечает за уничтожение
твоего компонента.
Определись, что ты понимаешь под текстом.
Edit1.Text - Это текст.
Label1.Caption - это текст.


Как ты ждал вот именно такой полной подсказки.

procedure TForm1.Button1Click(Sender: TObject);
var
Button: TButton;
begin
Button := TButton.Create(Self);
Button.Parent := Self;
Button.Caption := "Self";
Button.Left := 10;
Button.Top := 10;
Button.OnClick := NewButtonClick;
end;

procedure TForm1.NewButtonClick(Sender: TObject);
begin
ShowMessage("Ой блин - как просто!");
end;



Nikolay   (2001-12-24 22:29) [5]

2 Фе
мне кажется что
parent:=form1
лучше т.к. при закрытии
формы лабел сам удаляется
а так его еще destroy надо

Вот так!(с)



Фе   (2001-12-24 23:27) [6]

Нет, это лишнее.
Форма отвечает за удаление при Self.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.14;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.029 c
3-42362           Alan                  2001-12-12 17:44  2002.01.14  
Сортировка записей по пустому полю


14-42554          Merlin                2001-11-02 10:10  2002.01.14  
Новости VCL, что посоветуете?


1-42444           Brand                 2001-12-24 00:54  2002.01.14  
Gif на форме


4-42602           Shmel                 2001-11-06 01:07  2002.01.14  
Как получить текст из ячеек TstringGrid в чужом окне? Handle я знаю.


3-42346           Yakudza               2001-12-08 21:07  2002.01.14  
Word