AllowObjectSelection: Boolean;
Свойство AllowObjectSelection определяет возможность выделения объектов внутри группы. Если значение свойства True, то выделение объектов в группе возможно, при значении False - нет.
По умолчанию свойство имеет значение True.
Для выполнения примера в репозитории предполагается наличие рабочего пространства с идентификатором «WSP», содержащего группу объектов с идентификатором «Shape3».
Добавьте ссылки на системные сборки: Andy, Drawing, Metabase.
Sub Userproc;
Var
mb: IMetabase;
ws: IWxWorkspace;
Group: IWxGroup;
Shapes: IWxShapes;
Begin
// Получаем рабочее пространство для редактирования
mb := MetabaseClass.Active;
ws := mb.ItemById("WSP").Edit As IWxWorkspace;
Shapes := ws.Shapes;
ws.BeginUpdate;
Group := ws.Shapes.FindById("Shape3") As IWxGroup;
Group.AllowObjectSelection := False;
ws.EndUpdate;
(ws As IMetabaseObject).Save;
End Sub Userproc;
После выполнения примера выделение объектов внутри группы будет отключено.
См. также: