Как сделать кнопку во время исполнения???

← →
savyhinst © (2008-04-03 18:27) [0]

Подскажите пож. , как сделать кнопку во время исполнения.

← →
oldman © (2008-04-03 18:36) [1]

Сreate+F1?

Блин! Телепатор, ну помогай давай!!!

← →
{RASkov} © (2008-04-03 18:36) [2]

> [0] savyhinst © (03.04.08 18:27)

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

← →
Семеныч (2008-04-03 18:39) [3]

procedure TForm1.FormClick(...);
begin
with TButton.Create(Self) do
begin
Parent := Self;
OnClick := FormClick;
end;
end;

← →
savyhinst © (2008-04-03 18:40) [4]

понятно.

with TButton.Create(Self) do
begin
Parent := Self;
OnClick := FormClick;
Left:=Random(Self.Width-Width);
Top:=Random(Self.Height-Height);
end;
:) Иначе не видно "фишки")

Как сделать кнопку во время исполнения??? Найти похожие ветки