Текущий архив: 2008.04.27;
Скачать: CL | DM;
Вниз
Как сделать кнопку во время исполнения??? Найти похожие ветки
← →
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]понятно.
← →
{RASkov} © (2008-04-03 18:43) [5]with TButton.Create(Self) do
begin
Parent := Self;
OnClick := FormClick;
Left:=Random(Self.Width-Width);
Top:=Random(Self.Height-Height);
end;
:) Иначе не видно "фишки")
← →
Sergey13 © (2008-04-04 09:09) [6]> [0] savyhinst © (03.04.08 18:27)
Можно еще просто показать ранее созданную кнопку.
Страницы: 1 вся ветка
Текущий архив: 2008.04.27;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.012 c
