Скачать: CL | DM;

Создание контрола на форме   Найти похожие ветки 

← →
ovling   (2004-04-26 20:36) [0]

Доброго времени суток,
Я бы хотел узнать, можно ли на форме программно создать кнопку, списот и т.д. Если да, то как обрабатывать нажатие на созданную кнопку или выбор элемента из списка.

Зарание благодарен,
Ovling

---

← →
Боян Георгиев   (2004-04-26 20:42) [1]

procedure BtnClck(Sender: TObject);
begin
 ShowMessage("Button clicked");
end;

b := TButton.Create(Form1);
b.Parent := Form1;
b.OnClick = BtnClck;
Непроверено.

---

← →
P.N.P. ©   (2004-04-26 20:42) [2]

> ovling   (26.04.04 20:36)

procedure Button1OnClick(sender:TObject);
begin
...
end;

MyComponent:=TMyComponent.Create;
MyComponent.Parent:=Form1;
...
MyComponent.OnClick:=Button1OnClick;

---

← →
Gero ©   (2004-04-26 20:46) [3]

> procedure BtnClck(Sender: TObject);
> procedure Button1OnClick(sender:TObject);

procedure TSomeClass.SomeComponentClick(Sender: TObject);
...

---

← →
begin...end ©   (2004-04-26 20:50) [4]

> ovling   (26.04.04 20:36)

> можно ли на форме программно создать кнопку, списот и т.д.

Можно.

> как обрабатывать

Написать собственную процедуру и назначить её в качестве обработчика.

Рекомендую:

http://www.delphikingdom.com/asp/viewitem.asp?catalogid=342

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.021 c