pmxcad 发表于 2022-7-7 00:52:46

消防、门禁、cctv、安保、疏散。但并不总是这样。

BIGAL 发表于 2022-7-7 00:58:05

好的,通过放置(layoutlist)来理解您暗示这是一个lisp函数,而不是一个视图名称列表,给它一个try not tested,复制并粘贴到记事本另存为plotviews。lsp然后应用它。
 
vl-load-com)
(setq doc (vla-get-activedocument (vlax-get-acad-object)))
(vlax-for lay (vla-get-Views doc)
(setq plotabs (cons (vla-get-name lay) plotabs))
)
(foreach lay plotab(setvar "CTAB" lay) (command "PSPACE" "ZOOM" "E" "_PLOT" "Y" "" "DWG TO PDF" A3"" "M" "LANDSCAPE" "N" "V" "FIT" "" "Y" "Grayscale" "Y" "N" "N" "N" "" "N" "Y" ))(princ)

pmxcad 发表于 2022-7-7 01:01:52

消防、tgc、cctv、安全,。。。。。。但并非所有图纸都适用

pmxcad 发表于 2022-7-7 01:04:13

这是一个错误:
 
错误:输入上有额外的右括号

BIGAL 发表于 2022-7-7 01:07:45

说这不是测试的好时机,学习lisp额外的权利paren意味着它缺少一个(或)也改变plotab到plotab有一个洛克在第一行我的打字
页: 1 [2]
查看完整版本: 绘制所有(命名)视图的脚本