TColor zusammenbauen

[Florian Bernhardt]

Hi!

Wie kann ich einen TColor-Wert aus den 3 RGB-Werten zusammensetzen, die ich als Integer-Werte habe?

Und wie kann ich TColor in die andere Richtung wieder auflösen?

Danke, und gruss

Florian

[Hagen Reddmann]

TColor := RGB(R, G, B);<br>
R := GetRValue(ColorToRGB(TColor));<br>
G := GetGValue(ColorToRGB(TColor));<br>
B := GetBValue(ColorToRGB(TColor));<br>

Gruß Hage