logsplitter 发表于 2022-7-6 08:29:25

批量打印例程

附件是我与PDFCreator一起用于批量打印pdf图纸的例程。问题是我使用的是Bricscad V12,他们所做的最新更改使该例程关闭,因为“qprint”不再使用“previous”绘图变量。我想知道你们这些大师中是否有人知道如何将其适应“plot”命令?
 
我认为使用脚本可能是一种方式,但不知道如何插入它。有什么想法吗?
感谢您的任何意见!下面是例行公事。
 
代码B打印:
(默认C:B打印(/)
(if(非dos_dir)(arxload“DOSLib11.brx”))
(setq文件(dos\u getfilem“选择要打印的文件…”“C:\\”“图形文件(*.dwg)|*.dwg”))
(setq dwgpath(car文件))
(如果(/=文件为零)
(程序
(foreach dwgfile(acad\u strlsort(cdr文件))
(命令“.open”(strcat dwgpath dwgfile))
(命令“.qprint”)
(命令“.qsave”)
(命令“.close”)
)
)
)
)

SLW210 发表于 2022-7-6 08:51:21

请阅读代码发布指南

BIGAL 发表于 2022-7-6 09:24:37

使用普通打印并添加绘制窗口所需的所有设置,而不是qprint,它应该可以工作。
 
搜索一些PDF绘图例程以获取代码示例。查看BIGAL下

BIGAL 发表于 2022-7-6 09:42:48

从这里开始
 
http://www.cadtutor.net/forum/showthread.php?21460-打印PDF布局名称和突出显示=打印+PDF
页: [1]
查看完整版本: 批量打印例程