IWxStyle.TextMarginRight

Syntax

TextMarginRight: Double;

Description

The TextMarginRight property determines text right margin. If the values are negative, margin is calculated from the opposite side.

Example

Executing the example requires that the repository contains workspace with the IWSTYLE identifier containing shape.

Add links to the Andy, Drawing, Metabase system assemblies.

Sub UserProc;
Var
    mb: IMetabase;
    ws: IWxWorkspace;
    Shape: IWxShape;
    Style: IWxStyle;
Begin
    // Get workspace for editing
    mb := MetabaseClass.Active;
    ws := mb.ItemById("IWSTYLE").Edit As IWxWorkspace;
    ws.BeginUpdate;
    Shape := ws.Shapes.Item(0);
    Shape.Text := "Text";
    Style := Shape.Style;
    Style.TextFontSize := 14;
    Style.TextFontBrushColor := GxColor.FromName("Red");
    Style.TextMarginRight:= 12;
    ws.EndUpdate;
    (ws As IMetabaseObject).Save;
End Sub UserProc;

After executing the example the object will contain text of the defined color and size and with the set margin.

See also:

IWxStyle