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