IWxStyle.TextAlignmentVertical

Syntax

TextAlignmentVertical: GxAlignment;

Description

The TextAlignmentVertical property determines vertical text alignment.

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 := 12;
    Style.TextFontBrushColor := GxColor.FromName("Red");
    Style.TextAlignmentVertical := GxAlignment.Far;
    ws.EndUpdate;
    (ws As IMetabaseObject).Save;
End Sub UserProc;

After executing the example the object contains text of defined color, size which will be aligned to the bottom edge.

See also:

IWxStyle