ActiveCaption: IGxColor;
Свойство ActiveCaption возвращает объект, содержащий цвет заголовка активного окна.
Sub Main;
Var
SysColor: IGxSystemColors;
Color: IGxColor;
Begin
Color:=SysColor.ActiveCaption;
End Sub Main;
После выполнения примера в переменной «Color» будет содержаться цвет заголовка активного окна.
См. также: