[求助]有关透明指令的方法

Alan · 发表于 2003-12-19 10:29:00

LISP 定义透明指令的规则是什么？
我为何总是定义后不能使用

meflying · 发表于 2003-12-19 10:40:00

看看vlax-add-com的介绍。。。
注：在LISP中不可以使用command透明调用
(defun test( / ent entv)
  (setq ent (car (entsel)))
  (setq entv (vlax-ename->vla-object ent))
  (princ (vla-get-area entv))
)
(vlax-add-cmd "test" 'test "test" 1)

Alan · 发表于 2003-12-19 15:25:00

谢谢!!

[求助]有关透明指令的方法

发表回复

精选推荐