Shape2. Фигура,
которая будет являться связью. В качестве такой фигуры могут быть использованы:
линии (IWxLink),
соединительные линии (IWxStraightLink),
фигурные стрелки(IWxArrow),
фигурные двойные стрелки (IWxDoubleArrow);
Index2. Индекс
точки соединения фигуры Shape2.
Описание
Метод GlueConnectionPoints соединяет
точки двух объектов.
Пример
Для выполнения примера в репозитории предполагается наличие рабочего пространства
с идентификатором «WSP».
Добавьте ссылки на системные сборки: Andy, Drawing, Metabase.
Sub Userproc;
Var
mb: IMetabase;
wsp: IWxWorkspace;
Shapes: IWxShapes;
StrLink: IWxStraightLink;
Begin
// Получаем рабочее пространство
mb := MetabaseClass.Active;
wsp := mb.ItemById("WSP").Edit As IWxWorkspace;
Shapes := wsp.Shapes;
//
StrLink := wsp.CreateStraightLink;
wsp.GlueConnectionPoints(Shapes.Item(0), 2, StrLink, 0);
wsp.GlueConnectionPoints(Shapes.Item(1), 3, StrLink, 1);
//Сохраняем изменения
(wsp As IMetabaseObject).Save;
End Sub Userproc;