LinePenWxDashStyle: WxDashStyle;
LinePenWxDashStyle: Prognoz.Platform.Interop.Andy.WxDashStyle;
The LinePenWxDashStyle property determines line (font) style. By default, solid style is used for a line.
Use the IWxStyle.LinePenWidth property to determine line width.
Executing the example requires an existing ws object of the IWxWorkspace type.
Add links to the Andy, Drawing system assemblies.
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;
After executing this example the line will be displayed as a dash line, it will be green and of the specified thickness.
The requirements and result of the Fore.NET example execution match with those in the Fore example.
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;
See also: