ArrowWidthOffset: Double;
Свойство ArrowWidthOffset определяет длину стрелки.
В рассматриваемом примере предполагается существование объекта ws типа IWxWorkspace.
Sub UserProc;
Var
ws: IWxWorkspace;
DBArrow: IWxDoubleBoxArrow;
Begin
DBArrow := ws.Shapes.FindById("Shape 1") As IWxDoubleBoxArrow;
DBArrow.ArrowHeightOffset := 3;
DBArrow.ArrowWidthOffset := 25;
End Sub UserProc;
После выполнения примера будут изменены высота и длина стрелки.
См. также: