Ich habe folgende Typen übersetzt :
Delphi-Quellcode:
Paskal -> C
Single -> float
Int64 -> Long Long
Cardinal -> unsigned long int
double -> double
var x: integer -> int *x
var n: TVector2-> Tvector2 *n
und natürlich die beiden Type defs
Delphi-Quellcode:
// Paskal
// Type
// TKillCallback = Procedure(Address: Pointer); cdecl;
// C
typedef void TKillCallback(void *Address);
// Paskal
// Tvector2 = Record
// x: Single;
// y: Single;
// End;
// C
typedef struct{
float x;
float y;
}Tvector2;