RGB

← →
webpauk (2003-10-21 15:46) [0]

как извлечь из TColor: TColor.Red, TColor.Blue, TColor.Green значения?

← →
ZEE © (2003-10-21 15:47) [1]

GetRValue()
GetGValue()
GetBValue()

← →
jack128 © (2003-10-21 15:48) [2]

TmyColor - packet record
Red,
Blue,
Green,
Dummy : byte;
end;

Green := TmyColor(Form1.Color).Green;
помоему так..

← →
jack128 © (2003-10-21 15:53) [3]

sorry
TMyColor = packed record
Red,
Blue,
Green,
Dummy : byte;
end;

← →
webpauk (2003-10-21 15:54) [4]

2ZEE
спасиба