[TararykovDG]

Желаю всем здравствовать.
Вопрос такой. С помощью функций ssgetfirst и sssetfirst программно получаю набор выбранных на чертеже примитивов, т. е. примитивов с включенными ручками (ssgetfirst) или, наоборот, включаю ручки и подсвечиваю нужные примитивы на чертеже (sssetfirst nil <набор примитивов>). А для того, чтобы снять выделение с примитивов использую (sssetfirst nil nil). Так вот, нормально работает пока количество примитивов не очень велико, а вот если их много (например, > 50000), то вот подсвечиваются они (sssetfirst nil <набор>) нормально, а снятие выделения (sssetfirst nil nil) приводит к зависанию минут на 10, а то и вообще к полному абзацу! Кто знает, либо это только у меня ACad глючит, либо может есть альтернатива sssetfirst для снятия выделения с примитивов.

[Дима_]

только что проверил 89600 объектов - снимается (как и ставится) где-то за секунду

[TararykovDG]

Сообщение от Дима_ только что проверил 89600 объектов - снимается (как и ставится) где-то за секунду

Спасибо Дима_, значит дело скорее всего в моем конкретном ACad'e.
Вечером попробую на домашнем компе.

[VVA]

Как вариант

Код:

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

(if (setq ss (ssget "_I"))
  (command "_select")
  )

Сообщение от TararykovDG а снятие выделения (sssetfirst nil nil) приводит к зависанию минут на 10, а то и вообще к полному абзацу!

Попробуй это же самое при выключенном окне свойств

Код:

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

(command "_propertiesclose")

[Елпанов Евгений]

попробуй может так будет быстрее:

Код:

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

(sssetfirst nil  (ssadd(entlast)))
(sssetfirst nil nil)

или что нибудь на тему Esc, например:

Код:

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

(command nil)

а вообще, у меня тоже мгновенно (проверял на огромном массиве окружностей).
Хотя, на скорость влияет много факторов - настройки видеокарты, количество памяти, тип объектов выделения, например штриховки сильно подгружают видеоподсистему при выделении, а сплайны, грузят процессор...

[TararykovDG]

Попробовал на домашнем компе картина только усугубилась. Получилось следующее. Когда выбираем объекты на чертеже рамкой с помощью мыши, то в зависимости от значения системной переменной GRIPOBJLIMIT, объекты либо просто подсвечиваются пунктирной линией, если количество объектов больше заданного в GRIPOBJLIMIT, либо у них еще и включаются ручки, если меньше. Так вот если включена только подсветка объектов, то (sssetfirst nil nil) снимет выделение с объектов моментально (для любого количества объектов), а если были включены ручки, то все работает гораздо медленнее.

VVA Окно свойств и так вроде закрыто

Вариант (sssetfirst nil (ssadd (entlast))) (sssetfirst nil nil) не помог

Вариант (command nil) и (command “_select”) при тех же условиях работаю отлично, спасибо VVA и Елпанов Евгений. (Есть только один минус. Оба варианта выкидывают в ком. строку служебную инфу в отличии от sssetfirst)

[VVA]

Сообщение от TararykovDG Оба варианта выкидывают в ком. строку служебную инфу в отличии от sssetfirst

А так

Код:

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

(defun unselect()
(setvar "nomutt" 1)
(command "_select")
(while (> (getvar "CMDACTIVE") 0) (command ""))  
(setvar "nomutt" 0)
(princ))
(defun C:Q ()(unselect))

[TararykovDG]

Сообщение от VVA А так Код: [Выделить все] (defun unselect() (setvar "nomutt" 1) (command "_select") (while (> (getvar "CMDACTIVE") 0) (command "")) (setvar "nomutt" 0) (princ)) (defun C:Q ()(unselect))

Да, я сам люблю использовать nomutt, чтобы заменить подсказку для ssget.
Получается так:
nomutt = 1 ; cmdecho = 1
(command nil) -> *Прервано*
(command “_select”) -> _.select

nomutt = 1 ; cmdecho = 0
(command nil) -> *Прервано*
(command “_select”) -> "" - то что нужно, еще раз спасибо VVA