R: Integer;
The R property returns the red component of the color from 0 to 255.
Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
i: Integer;
Begin
i:=Panel1.Color.R;
End Sub Button1OnClick;
After executing the example on clicking the button the "i" variable contains the red color component of the panel named Panel1.
See also: