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

← →
Pk (2003-01-20 12:52) [0]

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

← →
still © (2003-01-20 12:56) [1]

Можно

← →
Pk (2003-01-20 12:57) [2]

А как?

← →
still © (2003-01-20 13:04) [3]

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

в MyForm:

uses CommonPr; ... var vMyForm: TMyForm; ... vMyForm.OnClick := CommonPr.OnClick; ...

← →
Anatoly Podgoretsky © (2003-01-20 13:16) [4]

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

← →
don-do (2003-01-20 15:47) [5]

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

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

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

Одинаковые события форм Найти похожие ветки