Graphics32 GR32 unter Delphi XE?

[OrtmannMedia]

Hallo,
habe die Graphics32 (GR32) Lib bisher unter Delphi 2010 im Einsatz.
Version 1.9.

Jetzt habe ich auf Delphi XE upgedatet.
Soweit ich sehe tut sich bei http://www.graphics32.org wieder nichts.

Leider lässt sich die GR32_RS2010 usw. package unter XE nicht compilieren.

Habe jetzt in der GR32.inc
das hier gefunden:



{$IFDEF VER210}
{$DEFINE INLININGSUPPORTED}
{$DEFINE COMPILER2010}
{$DEFINE COMPILER2009}
{$DEFINE COMPILER2007}
{$DEFINE COMPILER2006}
{$DEFINE COMPILER2005}
{$DEFINE COMPILER7}
{$DEFINE COMPILER6}
{$IFNDEF BCB}
{$DEFINE DELPHI2010}
{$ELSE}
{$DEFINE BCB7}
{$ENDIF}
{$ENDIF}


habe das kopiert und in das geändert:



{$IFDEF VER220}
{$DEFINE INLININGSUPPORTED}
{$DEFINE COMPILER2010}
{$DEFINE COMPILER2009}
{$DEFINE COMPILER2007}
{$DEFINE COMPILER2006}
{$DEFINE COMPILER2005}
{$DEFINE COMPILER7}
{$DEFINE COMPILER6}
{$IFNDEF BCB}
{$DEFINE DELPHI2010}
{$ELSE}
{$DEFINE BCB7}
{$ENDIF}
{$ENDIF}


Die Fehler haben sich von sehr viel auf 22 reduziert. Typische Fehlermeldung jetzt:

[DCC Fehler] GR32_Transforms.pas(1032): E2251 Doppeldeutiger überladener Aufruf von 'Hypot'
Math.pas(1473): Verwandte Methode: function Hypot(const Single; const Single): Single;
GR32_Math.pas(312): Verwandte Methode: function Hypot(const Single; const Single): Single;

-->

procedure TTwirlTransformation.ReverseTransformFloat(DstX, DstY: TFloat;
out SrcX, SrcY: TFloat);
var
xf, yf, r, t: Single;
begin
xf := DstX - Frx;
yf := DstY - Fry;

--> r := Hypot(xf, yf);
t := ArcTan2(yf, xf) + r * FTwirl;
SinCos(t, yf, xf);

SrcX := Frx + r * xf;
SrcY := Fry + r * yf;
end;



Kann mir Jemand einen Tipp geben wie ich weiterkommen könnte?

Herzliche Grüße,
Jürgen aus München