RGB-Farbwert in TColor konvertieren

[taaktaak]

Ahh, zu früh gefreut...

Auf die Gefahr hin, dass ich jetzt Prügel bekomme (ich denke heute sollte ich lieber den PC ausschalten):

API von RichEdit liefert den Farbwert als COLORREF vom Typ DWORD zurück; im DWord ist die Farbe in folgender Form enthalten 0x00BBGGRR.

Wie bekomme ich nun das DWord in untenstehende Funktion????????

Delphi-Quellcode:

function RGB2TColor(R,G,B:Byte):Integer; 
begin 
  Result := R or (G shl 8) or (B shl 16); 
end;

Sorry, ist heute nicht mein Tag!
Gruß Ralph