IWxStyle.BackgroundBrushBackColor

Синтаксис Fore

BackgroundBrushBackColor: IGxColor;

Синтаксис Fore.NET

BackgroundBrushBackColor: Prognoz.Platform.Interop.DrawingGxColor;

Описание

Свойство BackgroundBrushBackColor определяет цвет узора для фона объекта.

Пример Fore

В рассматриваемом примере предполагается наличие формы с размещёнными на ней компонентами Button и UiWorkspaceObject с идентификаторами «Button1» и «UiWorkspaceObject1» соотоветственно. К UiWorkspaceObject должен быть подключён соответствующий объект репозитория. Также этот компонент должен содержать заранее созданную фигуру.

Sub Button1OnClick(Sender: Object; Args: IMouseEventArgs);
Var
    ws: IWxWorkspace;
    Shape: IWxShape;
    Style: IWxStyle;
Begin
    ws := UiWorkspaceObject1.Instance As IWxWorkspace;
    ws.BeginUpdate;
    Shape := ws.Shapes.Item(1);
    Style := Shape.Style;
    Style.BackgroundBrushForeColor := GxColor.FromName("Red");
    Style.BackgroundBrushForeTransparent := 30;
    Style.BackgroundBrushBackColor := GxColor.FromName("Blue");
    Style.BackgroundBrushBackTransparent := 60;
    Style.BackgroundBrushPattern := GxBrushPattern.Diagonals;
    ws.EndUpdate;
End Sub Button1OnClick;

После выполнения примера при нажатии на компонент «Button1» на фигуре компонента «UiWorkspaceObject1» будет задана заливка с указанными настройками.

Пример Fore.NET

В рассматриваемом примере предполагается наличие формы с размещёнными на ней компонентами Button и UiWorkspaceObjectNet с идентификаторами «Button1» и «UiWorkspaceObjectNet1» соотоветственно. К UiWorkspaceObjectNet должен быть подключён соответствующий объект репозитория. Также этот компонент должен содержать заранее созданную фигуру.

Imports System;
Imports System.Windows.Forms;
Imports Prognoz.Platform.Forms.Net;
Imports Prognoz.Platform.Interop.Andy;
Imports Prognoz.Platform.Interop.Workspace;
Imports Prognoz.Platform.Interop.Drawing;
Imports Prognoz.Platform.Interop.ExtCtrls;

Private Sub button1_Click(sender: System.Object; e: System.EventArgs);
Var
    ws: WxWorkspace;
    Shape: IWxShape;
    Style: IWxStyle;
    SColor: GxColorClassClass = New GxColorClassClass();
Begin
    ws := uiWorkspaceObjectNet1.WorkspaceObjectUi.Instance As WxWorkspace;
    ws.BeginUpdate();
    Shape := ws.Shapes.Item[1];
    Style := Shape.Style;
    Style.BackgroundBrushBackColor := SColor.FromName("Red");
    Style.BackgroundBrushForeTransparent := 30;
    Style.BackgroundBrushBackColor := SColor.FromName("Blue");
    Style.BackgroundBrushBackTransparent := 60;
    Style.BackgroundBrushPattern := GxBrushPattern.wbpDiagonals;
    ws.EndUpdate();
End Sub;

После выполнения примера при нажатии на компонент «Button1» на фигуре компонента «UiWorkspaceObjectNet1» будет задана заливка с указанными настройками.

См. также:

IWxStyle