[Gaa]

Пытаюсь загрузить типы линий через лисп:

(command "linetype" "load" "*" "c:\My\\My_line.lin" "" "")

если в чертеже нет описанных в файле типов линий, все нормально, но стоит встретить существующую выдается ошибка.

что делать, как это обойти?

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

Проверь на наличие этого типа линии:

Код:

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

(if (not (tblobjname "ltype" имя_типа_линии))
;; Здесь загрузка
)

или используй (vl-catch-all-apply) и (vl-catch-all-error-p), если уж надо грузить все типы линий.

[Gaa]

или используй (vl-catch-all-apply) и (vl-catch-all-error-p), если уж надо грузить все типы линий.

если можно подробней или где можно прочитать про это.

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

Ну это в справке описано:
(vl-catch-all-apply 'function list)
Проверяет на предмет ошибочности выполнения функции к списку аргументов. Например:
(setq catchit (apply '/ '(50 0)))
; error: divide by zero
(setq catchit (vl-catch-all-apply '/ '(50 0)))
#<%catch-all-apply-error%>

(vl-catch-all-error-p arg)
Возвращает t при условии, если arg - ошибка. Т.е. если сделать
(vl-catch-all-error-p (vl-catch-all-apply '/ '(50 0)))
то вернется t, иначе nil.
---
ИМХО - а зачем грузить все типы-то? Может, подгружать только необходимые на данный момент и на этом успокоиться? Такое-то, я думаю, попроще будет, да и мусора в файле меньше.
---
Добавлено:
Посмотри на
http://dwg.ru/forum/viewtopic.php?t=...r=asc&start=15 (посты Apelsinov) и на его основе сделанное http://www.autocad.ru/cgi-bin/f1/board.cgi?t=22730iW