xiaomm250 发表于 2023-4-12 14:13:23

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

kucha007 发表于 2023-4-12 16:40:13

看看这个:http://bbs.mjtd.com/forum.php?mod=viewthread&tid=186790&highlight=lee%2Bmac%2B%BA%AF%CA%FD
页: [1]
查看完整版本: leemac的LM:acdoc是什么意思?为什么要那么写?