改命令不成功它占用了我一个重要的命令了
(defun c:UU ()(if (not (member 'ddmodify (vl-list-loaded-vlx)))
(load "贱人工具箱5.8.VLX")
)
(c:Y)
) 试试:
(defun c:uu ()
(if (null c:jianrengjx)
(progn (load "贱人工具箱5.8.VLX")(setq jianrengjx c:y)(defun c:jianrengjx ()(jianrengjx))
(vl-acad-undefun 'c:y)))(c:jianrengjx))
你自己的命令不要用直接用y,在PGP文件里指定Y为你的自己命令,就不冲突了。 直接再次编译试试? 好,我再试试,它要编译,不知道 谢谢指点迷津 不行,没办法 (defun c:UU ()
(c:Y)
)
这个不成吗 这样子写,那它不是把我的命令给改了掉了啊,我自己也有一个命令是Y命令,我想把它的改成别的命令 你这个不错 可以用 我刚才本搜了一下 就只有你这个可以屏蔽原有命令 这个好啊,
页:
[1]