Title: Convert RGB-color to Delphi's TColor
Question: How to convert a RGB-color to Delphi`s TColor?
Answer:
Syntax:
-------
myTcolor:=rgbtocolor(redvalue,greenvalue,bluevalue);
Example:
--------
form1.color:=rgbtocolor(255,0,0);
Function:
---------
function RGBToColor(R,G,B:Byte): TColor;
begin
Result:=B Shl 16 Or
G Shl 8 Or
R;
end;