roten Farbwert aus TColor extrahieren ??

[Kroko1999]

Zitat von iGoA:

entweder
rot := (color and $ff0000) shr 16;

oder

rot := (color and $ff);

eines von beiden. ich verwechsel manchmal, in welchem Byte rot und blau gespeichert sind.

(1) ist Falsch, dass ist Blau
(2) Color and $FF;

oder nimm GetRValue(Color);