Re: OnFilterRecord


"UN" <ukko_noa@xxxxxxxxxxxxxxxxxxx> wrote in message
news:d4m43d$k2s$1@xxxxxxxxxxxxxxxxxxxxx

> Ok, understood. But: I have two methods
> procedure TForm1.FindName(DataSet: TDataSet; var Accept: Boolean);
> procedure TForm1.FindNames(DataSet: TDataSet; var Accept: Boolean);
>
> If I have to know which one is on, the statement
>
> if Assigned (OnFilterRecord) then if OnFilterRecord = FindName then
....
>
> causes an error 'Not enough actual parameters'.

var m : tFilterRecordEvent;

m := FindName;
if @OnFilterRecord = @m . . .


.