IWxStyle.TextMarginLeft

Syntax

TextMarginLeft: Double;

Description

The TextMarginLeft property determines text left 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.TextMarginLeft:= 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