Source position: bmpcomn.pp line 79
type TColorRGBA = packed record
case Boolean of
False: (
B: Byte;
G: Byte;
R: Byte;
A: Byte;
);
True: (
RGB: TColorRGB;
end;