Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Добавление кнопок [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;


Наверх

Титульная страница Поиск, карта сайта Написать письмо