hex-codes in RGB werte und umgekehrt??

[bitsetter]

Zitat von maxmax:

gibt es in delphi eine funktion, mit der man RotGrünBlau - Farbanteile in die Hexcodes umwandelt und umgekehrt??
also z.B.
#FBF66F = R: 251 G: 246 B: 111
oder andersrum??

Hi,

Caption:= Format('#%.2x%.2x%.2x', [251, 246,111]); Mit GetGValue():

Delphi-Quellcode:

var
  Col: Cardinal;
begin
  Col:= $FBF66F;
  Caption:= Format('%d %d %d',[GetBValue(Col), GetGValue(Col),GetRValue(Col)]);

wäre eine Möglichkeit.