FPC treats procedural types "a little" different from Delphi / TP, see 
http://www.freepascal.org/docs-html/ref/refse17.html this . You can
therefore write your AddressOf function as:
FUNCTION AddressOf(VAR x): POINTER; 
... // variables (if you ever need)
begin
{$ifdef fpc}
AddressOf:=...@x;
{$else}
... // for other compilers
{$endif}
end;
-- 
View this message in context: 
http://www.nabble.com/Procedure-types-tp21096634p21102287.html
Sent from the Free Pascal - General mailing list archive at Nabble.com.

_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to