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

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

Одинаковые события форм

Pk ©   (2003-01-20 12:52:00) 

Можно ли как нибудь назначить одну и ту же обработку события OnClose разным формам?

---

Юрий Зотов   (2003-01-20 16:10:00) [1]

Я бы поостерегся быть столь оптимистичным. Все же метод будет принадлежать одному классу, а вызываться из другого. Возможны нежелательные нюансы с Self, Sender, TMethod.Data и т.п.

А вот так точно пройдет: пишем общую процедуру (не метод класса, а просто процедуру, с любыми параметрами) и вызываем ее из каждого индивидуального OnClose.

---

don-do   (2003-01-20 15:47:00) [2]

procedure TForm1.ApplicationEvents1Idle(Sender: TObject;
var Done: Boolean);
begin
Screen.ActiveForm.OkClick:=OnClick;
end;

---

Anatoly Podgoretsky   (2003-01-20 13:16:00) [3]

А ты знаешь как делается назначение?, с помощью оператора

---

still   (2003-01-20 13:04:00) [4]

Ну например, в юните CommonPr лежит обработчик, а в юните MyForm - форма. Тогда:

в MyForm:


uses CommonPr;
...
var
vMyForm: TMyForm;

...
vMyForm.OnClick := CommonPr.OnClick;
...



---

Pk   (2003-01-20 12:57:00) [5]

А как?

---

still   (2003-01-20 12:56:00) [6]

Можно

---

Наверх