Records funktionieren nicht unter 64Bit

[EWeiss]

Delphi-Quellcode:

  MatrixOrder = (
    MatrixOrderPrepend,
    MatrixOrderAppend
  );
  TMatrixOrder = MatrixOrder;
  GpMatrixOrder = TMatrixOrder;

GdipRotateWorldTransform: function(Graphics: LONG_PTR; angle: Single; order: GpMatrixOrder): GPSTATUS; stdcall;

funktioniert einwandfrei unter 32Bit aber nicht in 64Bit meine frage Warum?

Nur wenn ich diese Funktion so umschreibe dann geht es.

GdipRotateWorldTransform: function(Graphics: LONG_PTR; angle: Single; order: LongInt): GPSTATUS; stdcall;

und dann so übergebe

GdipRotateWorldTransform(graphics, ObjItem.angle + 180, Longint(MatrixOrderAppend)); Probleme über Probleme..

gruss