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

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

Как сделать кнопку во время исполнения??? [D7, XP]

savyhinst ©   (2008-04-03 18:27:00) 

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

---

Sergey13   (2008-04-04 09:09:00) [1]

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

Можно еще просто показатьранее созданную кнопку.

---

{RASkov}   (2008-04-03 18:43:00) [2]

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

---

savyhinst   (2008-04-03 18:40:00) [3]

понятно.

---

Семеныч   (2008-04-03 18:39:00) [4]

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

---

oldman   (2008-04-03 18:36:00) [5]

Сreate+F1?

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

---

{RASkov}   (2008-04-03 18:36:00) [6]

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

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

---

Наверх