(defun c:tst () (setq acadobject (vlax-get-acad-object) acaddocument (vla-get-activedocument acadobject) ) (setq activelayout (vla-get-activelayout acaddocument)) (repeat 3 (setq plot (vla-get-plot acaddocument)) (vla-plottodevice plot) ) ) 这段代码在R16及以下的CAD中运行正常,但在R17中却提示automation错误,未提供说明。 调试发现, 问题出现在(vla-plottodevice plot)这一句,这一句在第一次循环时未出错,但是第二次循环时出现以上错误,百思不得其解,why
|