leemac的LM:acdoc是什么意思?为什么要那么写?
(defun LM:acdoc nil(eval (list 'defun 'LM:acdoc 'nil (vla-get-activedocument (vlax-get-acad-object))))
(LM:acdoc)
)
我直接修改成了
(defun LM:acdoc()
(vla-get-activedocument (vlax-get-acad-object))
)
我运行了一下,代码还是能正常运行,那么请问他那么写比我修改后的比,有什么好处?
参考代码见
http://www.lee-mac.com/copytolayouts.html
看看这个:http://bbs.mjtd.com/forum.php?mod=viewthread&tid=186790&highlight=lee%2Bmac%2B%BA%AF%CA%FD
页:
[1]