IWxShape.Text

Синтаксис

Text: String;

Описание

Свойство Text определяет текст, который будет содержать фигура.

Пример

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

Sub UserProc;

Var

ws: IWxWorkspace;

Shape: IWxShape;

Begin

ws.BeginUpdate;

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

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

Shape.Style.TextFontSize := 12;

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

ws.EndUpdate;

End Sub UserProc;

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

См. также:

IWxShape