IWxStyle.LinePenWxDashStyle

Синтаксис Fore

LinePenWxDashStyle: WxDashStyle;

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

LinePenWxDashStyle: Prognoz.Platform.Interop.Andy.WxDashStyle;

Описание

Свойство LinePenWxDashStyle определяет стиль (начертание) линии. По умолчанию для линии используется сплошное начертание.

Комментарии

Для определения толщины линии используйте свойство IWxStyle.LinePenWidth.

Пример Fore

В рассматриваемом примере предполагается существование объекта ws типа IWxWorkspace.

Добавьте ссылки на системные сборки «Andy», «Drawing».

Sub UserProc;
Var
    ws: IWxWorkspace;
    Link: IWxLink;
    Style: IWxStyle;
Begin
    ws.BeginUpdate;
    Link := ws.Shapes.Item(3) As IWxLink;
    Style := Link.Style;
    Style.LinePenWxDashStyle := WxDashStyle.Dash;
    Style.LinePenColor := GxColor.FromName("Green");
    Style.LinePenWidth := 1.5;
    ws.EndUpdate;
End Sub UserProc;

После выполнения примера линия будет отображена в виде штрихов, для линии будет использован зеленый цвет и заданная толщина.

Пример Fore.NET

Необходимые требования и результат выполнения примера Fore.NET совпадают с примером Fore.

Imports Prognoz.Platform.Interop.Andy;
Imports Prognoz.Platform.Interop.Drawing;
…
Public Shared Sub Main(Params: StartParams);
Var
    ws: IWxWorkspace;
    Link: IWxLink;
    Style: IWxStyle;
    GxColorCls: GxColorClassClass = New GxColorClassClass();
Begin
    ws.BeginUpdate();
    Link := ws.Shapes.Item[3] As IWxLink;
    Style := Link.Style;
    Style.LinePenWxDashStyle := WxDashStyle.wdsDash;
    Style.LinePenColor := GxColorCls.FromName("Green");
    Style.LinePenWidth := 1.5;
    ws.EndUpdate();
End Sub;

См. также:

IWxStyle