ActiveBorder: IGxColor;
The ActiveBorder property returns the object that contains the color of the active window border.
Sub Main;
Var
SysColor: IGxSystemColors;
Color: IGxColor;
Begin
Color:=SysColor.ActiveBorder;
End Sub Main;
After executing the example the Color variable contains the color of the active window border.
See also: