![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Добавление кнопок [D7, Win2k, WinXP]
Ботвин Дмитрий © (2005-05-25 11:29:00)Всем привет! Подскажите, кто знает, как можно программно добавлять на форму определённое кол-во кнопок. Т.е. форма взависимости от определённых условий изменяет свои размеры, исходя из размеров нужно разместить определённое кол-во кнопок
на ней. Одна будет всегда, а как добавть другие? Заранее всем
спасибо!
Marser (2005-05-25 16:33:00) [1]
// 1. Описываем переменную класса.
var button:TButton;
...
//2. Создаём и задаём нужные свойства:
Button:=TButton.Create(Form1)
with Button do begin
Left := ..;
Top := ..;
Width := ..;
Height := ..;
Caption := ..;
...
//Ключевое свойство - Parent. Задаёт родительский компонент(форму, панель и т.д.)
Parent:=Form1;
...
Digitman (2005-05-25 11:41:00) [2]with TMyButton.Create(MyForm) do
begin
Left := ..;
Top := ..;
Width := ..;
Height := ..;
Caption := ..;
// .. и т.д.
Parent := MyForm;
end;