
(*
 Delphi Object and Component Reference
#{bmc bm9.BMP} ColorToRGB example
The following line converts the color of the current form, Form1, to a Windows RGB value:
*) 
long  L = ColorToRGB(Form1->Color); 
