IWxStyle.TextPosition

Синтаксис

TextPosition: WxTextPosition;

Описание

Свойство TextPosition определяет расположение текста относительно картинки, используемой в качестве заливки объекта.

Пример

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

Sub UserProc;

Var

ws: IWxWorkspace;

Shape: IWxShape;

Style: IWxStyle;

Begin

ws.BeginUpdate;

Shape := ws.Shapes.Item(1);

Shape.Picture := New GxImage.CreateFromFile("C:\Image1.gif");

Shape.Text := "Текст";

Style := Shape.Style;

Style.TextFontBrushColor := GxColor.FromName("Red");

Style.TextPosition := WxTextPosition.Right;

ws.EndUpdate;

End Sub UserProc;

После выполнения примера в качестве заливки для фигуры будет использоваться изображение и фигура будет содержать текст, выровненный справа относительно картинки.

См. также:

IWxStyle