Es geht auch direkt, wenn es sich
nur um C Code handelt. Wenn dieser auf die C Grundfunktionen zugreift, musst du sie in deinem Programmcode gekannt machen.
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20:
| {$L MyCFile.obj}
function malloc(Size: Integer): Pointer; cdecl; begin GetMem(Result, Size); end;
procedure free(P: Pinter); cdecl; begin FreeMem(P); end;
procedure MyCFunction; cdecl; external; function AnotherCFunction(P: PChar); cdecl; external;
begin MyCFunction; AnotherCFunction('Hallo'); end; |
Das beste Beispiel hier ist die ZLib Unit, deren Quellcode ab der Professional Version beiliegt.