IWxWorkspace.CreateRoundedRectangle

Синтаксис

CreateRoundedRectangle: IWxRoundedRectangle;

Описание

Метод CreateRoundedRectangle создает прямоугольник со скругленными углами.

Пример

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

Sub UserProc;

Var

ws: IWxWorkspace;

Rec : IWxRoundedRectangle;

Begin

Rec := ws.CreateRoundedRectangle;

Rec.Id := "Rectangle1";

Rec.PinPosition := New GxPointF.Create(12.3,-2);

Rec.RoundingOffset := 9;

Rec.Text := "Фигура";

End Sub UserProc;

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

См. также:

IWxWorkspace