clRed wird falsch in Hex umgewandelt, warum ?

[mimi]

Hallo,
ich brauche den hex wert von clRed, dazu habe ich mir folgene funktion geschrieben:

Delphi-Quellcode:

procedure TPW.DrawColorText(Text:String;x,y:Integer;tc:TColor);
var
  s:String;
begin
  s:='#$'+IntToHex(ColorToRgb(tc),9);
  PowerFont1.Scale:= 256;
  PowerFont1.Style:= [fsBold, fsItalic];
  PowerFont1.TextOut(s+ Text, x, y, $3FAFFF);
end;

das #$ muss davor weil ich PowerDraw nutze...
und jetzt bekomme ich falsche farbwerte z.b. bei rot:
0000000FF
rot währe ja
FF00000FF
und bei den andren farben ist das änlich.... warum ???