[protorgovec]

Добрый день. Может кто нибудь подскажет. Столкнулся с такой проблемой. При выкидывании детали в отдельный файл он вместе с ним создает Layouts. Но на разных компьютерах эти Layouts разные.
Командой

Код:

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

 (vla-delete (vla-Item (vla-get-Layouts Ch2) "A1v"))

можно удалить определенный Layout. Можно ли программно заставить удалять все Layouts не зависимо как они называются?

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

Можно. ПРимерно так (пишу без проверки):

Код:

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

(vlax-for item (vla-get-layouts doc)
(vl-catch-all-apply (function (lambda() (vla-delete item)))))

[gomer]

Этот метод плох тем, что всегда возвратит ошибку

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

Ну объяви сначала переменную doc. Код должен снести все листы, в том числе и текущий. Поскольку ACAD без листов не может, будет создан новый пустой лист с именем по умолчанию.

[gomer]

Сообщение от Кулик Алексей aka kpblc Ну объяви сначала переменную doc.

дело не в переменной doc, а в том что не каждый кад даст удалить последний лист

[Linkshunter]

гуру, соберите весь код пожалуйста(как приложение), если есть время и желание! заранее благодарю.