Hallo,
wenn ich aus einer Farbe (TColor) die einzelnen RGB-Werte extrahieren will, dann mache ich das normalerweise so:
<br><br>
farbeB := ($00FF0000 and clSilver) div $10000 -> Blau<br>
farbeG := ($0000FF00 and clSilver) div $100 -> Grün<br>
farbeR := $000000FF and clSilver -> Rot<br>
<br>
Bei <b>clBtnFace</b>, bzw. der Hintergrundfarbe meines Forms funktioniert das allerdings nicht. Dort bekomme ich immer dezimal 0 für blau und grün, 15 für rot. In der Deklaraton sieht clBtnFace auch anders aus als die Standard-Farben ...
Wer kann mir helfen? Wie kann ich die Formularfarben einzeln extrahieren?
mfG,
Patrick Krause
wenn ich aus einer Farbe (TColor) die einzelnen RGB-Werte extrahieren will, dann mache ich das normalerweise so:
<br><br>
farbeB := ($00FF0000 and clSilver) div $10000 -> Blau<br>
farbeG := ($0000FF00 and clSilver) div $100 -> Grün<br>
farbeR := $000000FF and clSilver -> Rot<br>
<br>
Bei <b>clBtnFace</b>, bzw. der Hintergrundfarbe meines Forms funktioniert das allerdings nicht. Dort bekomme ich immer dezimal 0 für blau und grün, 15 für rot. In der Deklaraton sieht clBtnFace auch anders aus als die Standard-Farben ...
Wer kann mir helfen? Wie kann ich die Formularfarben einzeln extrahieren?
mfG,
Patrick Krause
Comment