Delphi ist etwas her bei mir, deswegen habe ich gleich mal im Code von Indy nachgesehen und da wird die Direktive {$EXTERNALSYM SOME_CONSTANT} z.B. in der IdWinSock2.pas vor der Konstanten verwendet. Also im Zweifel würde ich diese Notation übernehmen.
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21:
| const {$EXTERNALSYM IOCPARM_MASK} IOCPARM_MASK = $7F; {$EXTERNALSYM IOC_VOID} IOC_VOID = $20000000; {$EXTERNALSYM IOC_OUT} IOC_OUT = $40000000; {$EXTERNALSYM IOC_IN} IOC_IN = $80000000; {$EXTERNALSYM IOC_INOUT} IOC_INOUT = (IOC_IN or IOC_OUT);
...
{$EXTERNALSYM timeval} timeval = record tv_sec: Longint; tv_usec: Longint; end; TTimeVal = timeval; PTimeVal = ^TTimeVal; |
Stellen Sie sich bitte Zirkusmusik vor.