Re: TNotifyEvent

Fons Rave wrote:
var X, Y : TNotifyEvent;
begin
X := nil; { *1 }
Y := X; { *2 }

if X = nil then ; { *3 }

if not Assigned(X) then ;

if X = Y then ; { *4 }

if (TMethod(X).Code = TMethod(Y).Code) and (TMethod(X).Data = TMethod(Y).Data) then ;

The compiler does not allow comparison of method-pointer types.

--
Rob
.