Re: TZF - SetFilterToCB

> function TForm1.MyFilter : boolean   ----> compile  error
> 

Try this:

In top of the code , before the calling procedure

function myFilterr:Boolean;far;  // No Form !
begin
       // your code, remeber form1 before variable used

   //    result:=form1.var1>0

end;

then set 

procedure form1.callfilter; // after the filter
begin
 Mydata.SetFilterToCB(@myFilter); // remember then @
end;

Bo

--^----------------------------------------------------------------
This email was sent to: [email protected]

EASY UNSUBSCRIBE click here: http://topica.com/u/?clvXPN.a5kvff.Z2NsZHQt
Or send an email to: [email protected]

TOPICA - Start your own email discussion group. FREE!
http://www.topica.com/partner/tag02/create/index2.html
--^----------------------------------------------------------------