Сравнение событий Onxxxx

← →
atruhin © (2006-10-23 16:47) [0]

Делаем присваивание:
Button1.OnClick := MyProc;
Далее необходимо сравнить:
if Button1.OnClick = MyProc then .....
Выдает ошибку: Not enought actual parameters. Как это сделать?

← →
Плохиш © (2006-10-23 16:54) [1]

> if Button1.@OnClick = @MyProc then .....

?

← →
Плохиш © (2006-10-23 16:56) [2]

Первой собачки не надо :-)

← →
Джо © (2006-10-23 17:04) [3]

> [0] atruhin © (23.10.06 16:47)

Это еще смотря на то, что у тебя MyProc. Если это идентификатор метода, то тогда придется делать что-то в роде:
var P: TNotifyEvent; begin P := MyProc; if @OnClick = @P then

Сравнение событий Onxxxx Найти похожие ветки