• На форуме с 24 мая 2023г.
  • Сообщений: 3
  • Спасибо: 0

Тема: Поместить объекты на задний план чертежа

Как программно из Delphi Поместить объекты на задний план чертежа

  • На форуме с 24 мая 2023г.
  • Сообщений: 3
  • Спасибо: 0

Re: Поместить объекты на задний план чертежа

Код выделяю все линии слоя сетка
SelSet:= Acad.ActiveDocument.SelectionSets.Add('сетка');

  FilterType:= VarArrayCreate([0, 3], varSmallint);
  FilterData:= VarArrayCreate([0, 3], varVariant);
  FilterType[0]:= -4;
  FilterData[0]:= '<and';
  FilterType[1]:= 0;
  FilterData[1]:= 'Line';
  FilterType[2]:= 8;
  FilterData[2]:= 'сетка';
  FilterType[3]:= -4;
  FilterData[3]:= 'and>';
  SelSet.Select(5, Null,  Null, FilterType, FilterData);
  SelSet.Highlight(true);

Затем пытаюсь сделать таблицу выделения
eDictionary:=Acad.ActiveDocument.ModelSpace.GetExtensionDictionary;
sentityObj := eDictionary.AddObject('ACAD_SORTENTS', 'AcDbSortentsTable');


а что добавлять в аргументы не пойму sentityObj.MoveToBottom();