<font face="monospace">Hi,</font><div><font face="monospace"><br></font></div><div><font face="monospace">Is it possible to do the following:</font></div><div><font face="monospace"><br></font></div><div><font face="monospace">=== example ===</font></div><div><font face="monospace"><br></font></div><div><font face="monospace">program test;</font></div><div><font face="monospace">type</font></div><div><font face="monospace"><br></font></div><div><font face="monospace">  TMyClass = class</font></div><div><font face="monospace">  type</font></div><div><font face="monospace">    TDataFilter = function </font></div><div><font face="monospace">  public</font></div><div><font face="monospace">    Value : Double;</font></div><div><font face="monospace">    Filter: TDataFilter;</font></div><div><font face="monospace">    procedure ViewData;</font></div><div><font face="monospace">  end;</font></div><div><font face="monospace"><br></font></div><div><font face="monospace">procedure TMyClass.ViewData;</font></div><div><font face="monospace">begin</font></div><div><font face="monospace">  if Filter = nil then</font></div><div><font face="monospace">    WriteLn(Value)</font></div><div><font face="monospace">  else</font></div><div><font face="monospace">    WriteLn(Filter(Value));</font></div><div><font face="monospace">end;</font></div><div><font face="monospace"><br></font></div><div><font face="monospace">var</font></div><div><font face="monospace">  t : TMyClass;</font></div><div><font face="monospace">begin</font></div><div><font face="monospace">  t := TMyClass.Create;</font></div><div><font face="monospace">  t.Value = 2;</font></div><div><font face="monospace">  t.Filter := @sqr;   //this does not work</font></div><div><font face="monospace">  t.Filter := @ln;    //this does not work either</font></div><div><font face="monospace">  t.ViewData;</font></div><div><font face="monospace">  t.Free;</font></div><div><font face="monospace">end.</font></div><div><font face="monospace">=========</font></div><div><font face="monospace"><br></font></div><div><font face="monospace">The problem is, while assign function pointers to Filter, I would like to make it accept all numeric functions.  That is, if I define it to accept Double, it should accept Single and Integers, and if I define it to accept Extended, it should accept all numbers.</font></div><div><font face="monospace"><br></font></div><div><font face="monospace">Possible?</font></div><div><font face="monospace"><br></font></div><div><font face="monospace">Thanks,</font></div><div><font face="monospace">Shannon</font></div>