[Witalij]

Почистил файл, и заметил, что при работе аудит-а пишется, что проверено 900 объектов!!
Откуда столько??? Или это нормально??
Акад 2006 рус, спдс-а нету.

[Кулик Алексей aka kpblc]

Откуда взялось 900 объектов в последнем проходе _.audit - не представляю. Тем не менее: в файле 2 неотсоединенных растра + 37 лишних зарегистрированных приложений.

[Witalij]

Сообщение от Кулик Алексей aka kpblc Откуда взялось 900 объектов в последнем проходе _.audit - не представляю. Тем не менее: в файле 2 неотсоединенных растра + 37 лишних зарегистрированных приложений.

А как ты эти данные получил?

[Кулик Алексей aka kpblc]

_.xref -> пусто
_.image -> 2 растра
_.-purge <enter> _r <enter> <enter> _n <enter> ну и просмотр лога по [F2].
Все равно в результате 900 объектов находит _.audit...

[Witalij]

Сообщение от Кулик Алексей aka kpblc _.xref -> пусто _.image -> 2 растра _.-purge <enter> _r <enter> <enter> _n <enter> ну и просмотр лога по [F2]. Все равно в результате 900 объектов находит _.audit...

Сенкс.
На _.image - б%%, палюсь забыл убрать в своё время.

[asys]

Сообщение от Witalij Сенкс. На _.image - б%%, палюсь забыл убрать в своё время.

уж не печать и подпись Данилова Ильи подделывал?

[Witalij]

Сообщение от Asys уж не печать и подпись Данилова Ильи подделывал?

Неа
Недавно проект собирал в кучу - там на 4 папки чертежей - суммарно листов 700 - и везде чуть было не пришлось подписываться - решил электронно свою подпись ставить...
Обошлось потом - вообще не надо было моей подписи.

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

В чертеже > 800 неименованных групп.

[Witalij]

Сообщение от Александр Ривилис В чертеже > 800 неименованных групп.

А как это мне увидить? есть лиспик какой-нибудь??

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

Тебе увидеть или избавится от них? Если просто избавится - то достаточно выполнить команду _WBLOCK и указать весь чертеж. В этом случае ничего лишнего в выходной файл не попадет. Ну а если посмотреть, то это к Алексею. :-)
А можно и так:

Код:

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

 
(foreach x (dictsearch (namedobjdict) "ACAD_GROUP") 
  (if (= (car x) 3) (princ (strcat "\nGroup=" (cdr x)))))

[phantom_l]

Разрешите пожалуйста вклиниться в вашу тему, просто у меня , как мне кажеться , похожий вопрос. Вот решил освоить работу со слоями ( до этого все рисовал в одном ). После запуска layer оказалось , что их в моем списке не менее 15 штук ( остались по наследству от кого-то ). Удалить удалось большинство , но не все . Некоторые слои не удаляются по причине того, что на них якобы есть объекты . Но если выделить слой , никаких объектов не видно. Как мне удалить эти слои ?

[Witalij]

Сообщение от Александр Ривилис А можно и так: Код: [Выделить все] (foreach x (dictsearch (namedobjdict) "ACAD_GROUP") (if (= (car x) 3) (princ (strcat "\nGroup=" (cdr x)))))

А как это запустить? так?

Код:

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

 
(defun C:qqq ()
(
(foreach x (dictsearch (namedobjdict) "ACAD_GROUP") 
  (if (= (car x) 3) (princ (strcat "\nGroup=" (cdr x)))))
)

Пишет: ; ошибка : неверно сформированный список на входе

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

Можно и так.

[VVA]

Сообщение от Witalij А как это мне увидить? есть лиспик какой-нибудь??

LISP. Группировка и разгруппировка объектов

Там же найдешь

;;;======================================================= ;;; Команды ;;;======================================================= ;;; Удаляет все группы Purge All Groups (defun C:PAG ()(PurgeAllGroups)) ;;; Удаляет все пустые группы Purge Empty Groups (defun C:PEG ()(PurgeAllEmptyGroups)) ;;; Удаляет все неименованные группы Purge Unnamed Groups (defun C:PUG ()(PurgeAllUnNamedGroups))