关于加载.arx程序的问题

726613

在CAD中加载别人的.arx程序文件时命令长，应如何简化，就像加载别人的VLX程序文件命令简化的方法如下：


(defun c:a  ( )
  (if (not (member 'ddmodify (vl-list-loaded-vlx)))
  (load "SFDEFKEFK.VLX"))
  (c:SFDE)
(princ)
)

用上面的方法如下：

(defun c:B ( )
  (if (not (member 'ddmodify (vl-list-loaded-vlx)))
  (load "SFDEFKEFK.ARX"))
  (c:SFDE)
(princ)
)
  输入B提示错误，请高手指点迷津谢谢

Gu_xl

2. (defun c:B ( )
   
3.   (if (not (member "sfdefkefk.arx" (arx)))
   
4.   (arxload "sfdefkefk.arx"))
   
5.   (c:SFDE)
   
6. (princ)
   
7. )

(defun c:B ( ) <br />   (if (not (member "sfdefkefk.arx" (arx))) <br />   (arxload "sfdefkefk.arx")) <br />   (c:SFDE)<br /> (princ)<br /> )

726613

Gu_xl 发表于 2013-4-17 20:34

谢谢Gu_xl 版主的帮助

迹扬

又学会一个函数arxload，正好需要。
以前不知道这个，我试过load不行，又试了appload也不行。