[dextron3]

Для подгрузки лиспа использую такой макрос:

(if (= sum nil) ( Load (findfile "Lisp/sum.lsp"))) comand


А что использовать для подгрузки .dvb файлов,
так как там нужно вводить 2 значения,
приходиться сам файл закидывать в портфель,
только после этого работает:

Макрос:

^C^C_-vbarun comand

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


Заранее благодарен!

[Makswell]

dextron3, arx загружен. Ты можешь увидеть его в списке загруженных arx'ов, если наберёшь:

Код:

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

(vlax-safearray->list (vlax-variant-value (vla-ListArx (vlax-Get-Acad-Object))))

Далее вводи команду, определённую в arx'е, на выполнение.

[Makswell]

Вообще, я подумал, чтоб ты особо не грузился, то можно сделать так.
Допустим есть файл myarx.arx. В нём определена команда arx-command.
Делаешь файл myarx.lsp такого содержания:

Код:

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

(defun c:Load_Arx ()
 (vla-LoadArx (vlax-Get-Acad-Object) "myarx.arx")
)

А далее макрос на кнопку твоим способом.

Код:

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

^C^C(if (= c:Load_Arx nil) (progn ( Load (findfile "myarx.lsp")) (command "Load_Arx")));arx-command;

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

Либо оформляй все одним лиспом, либо извращайся.
dwg.ru/art/8