Thema
:
Delphi
RGBToHex und umgekehrt
Einzelnen Beitrag anzeigen
EWeiss
(Gast)
n/a Beiträge
#
2
AW: RGBToHex und umgekehrt
18. Mai 2019, 11:10
sorry für die Post habe mich da um eins vertan
markieren
Delphi-Quellcode:
R := Byte(StrToInt('
$
' + Copy(UseColor, 2, 2)));
G := Byte(StrToInt('
$
' + Copy(UseColor, 4, 2)));
B := Byte(StrToInt('
$
' + Copy(UseColor, 6, 2)));
So stimmt es.
gruss
Zitat
