IWxShape.TextVertOffset

Синтаксис

TextVertOffset: Double;

Описание

Свойство TextVertOffset определяет вертикальное смещение текста. Данное свойство можно использовать только для линии (IWxLink). При положительных значениях свойства сдвиг текста производится вниз от центра линии, при отрицательных - вверх от центра линии.

Пример

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

Sub UserProc;

Var

ws: IWxWorkspace;

Link : IWxLink;

Begin

ws.BeginUpdate;

Link := ws.Shapes.Item(3) As IWxLink;

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

Link.TextHorzOffset := 20;

Link.TextVertOffset := -10;

ws.EndUpdate;

End Sub UserProc;

После выполнения примера для линии будет задан и смещен текст.

См. также:

IWxShape