[Apelsinov]

есть список vla- объектов, нужно их все подсветить с ручками, т.е. сделать из них предвыбор. Как это сделать проще?

[TararykovDG]

Сообщение от Apelsinov есть список vla- объектов, нужно их все подсветить с ручками, т.е. сделать из них предвыбор. Как это сделать проще?

У меня только через одно место получилось

Код:

[Выделить все]

 
; lst - список vla-объектов
(setq nbr (ssadd))
(sssetfirst nil (foreach item lst (setq nbr (ssadd (vlax-vla-object->ename item) nbr))))

[Александр Ривилис]

Сообщение от TararykovDG У меня только через одно место получилось

А это фактически единственное место. :-)

[Apelsinov]

TararykovDG, Спасибо! Давно я уже не пользовался наборами.

Если честно, я думал что есть способ решить это через vla -функции, в частности через добавление в PickfirstSelectionSet, однако, у меня так не получилось Странно это, однако, такая простая задача никак не решается через activex