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