denverado 发表于 2022-7-5 23:20:40

打印机设置lisp

你好
 
我创建了一个lisp例程,该例程删除了所有现有的打印样式,并添加了新的样式,然而,在工作的4台计算机中,它只能在2台上工作。
另两个得到这个错误“VLAX-get-ACAD-OBJECT error”。
 
(defun c:pms    (/)
(vlax-map-collection
   (vla-get-Plotconfigurations
   (vla-get-ActiveDocument
   (vlax-get-Acad-Object)
   )
   )
   'vla-delete
)
(command "._-PSETUPIN" "T:/CAD Library/LWA Lisp Routines/plotsetup.dwg" "*")
(prinC)
)
 
有人能帮忙吗?

Tharwat 发表于 2022-7-6 00:19:45

添加以下函数以加载visual lisp代码库。
 
(vl-load-com)

denverado 发表于 2022-7-6 00:33:41

谢谢
我们决定走另一条路。
 
我对新的Lisp程序有问题。不允许我在打印机名称前添加双黑斜杠。
有人有办法吗?
 
(defun c:p1 (/)
(command "-plot" "y" "" "\\LWAFAPSVR01\Level 1 Printer 1 PCL" "a3"
"Millimeters" "Landscape" "n" "window" "-8.060648,5.971115"
"811.939352,579.971115" "1:2" "center" "y" "LWA_A1 to A3_Plot.ctb" "y"
"n" "n" "n" "n" "y" "y")
(prinC)
)
页: [1]
查看完整版本: 打印机设置lisp