Добавление кнопок

← →
Ботвин Дмитрий (2005-05-25 11:29) [0]

Всем привет! Подскажите, кто знает, как можно программно добавлять на форму определённое кол-во кнопок. Т.е. форма взависимости от определённых условий изменяет свои размеры, исходя из размеров нужно разместить определённое кол-во кнопок
на ней. Одна будет всегда, а как добавть другие? Заранее всем
спасибо!

← →
Digitman © (2005-05-25 11:41) [1]

with TMyButton.Create(MyForm) do
begin
Left := ..;
Top := ..;
Width := ..;
Height := ..;
Caption := ..;
// .. и т.д.
Parent := MyForm;
end;

// 1. Описываем переменную класса. var button:TButton; ... //2. Создаём и задаём нужные свойства: Button:=TButton.Create(Form1) with Button do begin Left := ..; Top := ..; Width := ..; Height := ..; Caption := ..; ... //Ключевое свойство - Parent. Задаёт родительский компонент(форму, панель и т.д.) Parent:=Form1; ...

Добавление кнопок Найти похожие ветки