Gennady
Гений
(60223)
16 лет назад
Доброго времени суток.
Такой код создаст кнопку в верхнем левом углу формы.
var
B : TButton;
begin
....
B := TButton.Create (Form1); // создается кнопка с владельцем Form1 и размерами по-умолчанию
B.Caption := 'Кнопка'; // на кнопке формируется надпись
B.OnClick := процедура обработки нажатия кнопки
// установка других свойств
B.Parent := Form1; // назначаем владельца кнопки - кнопка появляется на форме.
....
end;
Удачи!