lisp编程：请问高手们，CAD批量打印时能实现不弹出对话框、自动命名和保存吗？

aihuyujian · 发表于 2015-5-6 17:41

感觉把command里面名字那一步用(strcat "name" (vl-princ-to-string i))代替这样循环的时候就不会覆盖了吧

zzyong00 · 发表于 2015-5-6 22:06

用图纸集功能，发布为pdf，一键搞定

ucuc2003 · 发表于 2015-5-7 00:53

顶起来，学习下源码！

wenhua · 发表于 2015-5-7 07:54

aihuyujian 发表于 2015-5-6 17:41
感觉把command里面名字那一步用(strcat "name" (vl-princ-to-string i))代替这样循环的时候就不会覆盖了吧

谢谢，但用command命令，没有输入名字啊，名字是默认的

Casa小宝 · 发表于 2015-5-7 12:06

可以参考下我的帖子 http://bbs.mjtd.com/thread-107692-1-1.html

ygp820601 · 发表于 2015-5-7 16:20

(vl-file-copy pdffile filename)
pdffile是打印生成的文件
filename是你指定的文件名
当然都是有路径的，如：
(setq pdffile (strcat "C:\\Documents and Settings\\Administrator\\My Documents\\" (vl-filename-base (GETVAR "DWGNAME")) " "(getvar 'ctab)" (1).pdf"))
(setq filename (strcat dir (substr (acet-dxf 1 ent) (+ gn 1)) "-" (vl-filename-base (GETVAR "DWGNAME")) ".pdf"))
(setq filename (strcat dir "G" (acet-dxf 1 ent) "-" (vl-filename-base (GETVAR "DWGNAME")) ".pdf"))

wenhua · 发表于 2015-5-8 09:21

ygp820601 发表于 2015-5-7 16:20
(vl-file-copy pdffile filename)
pdffile是打印生成的文件
filename是你指定的文件名

非常感谢，我烦恼了十几天没解决的问题您三句就给我解决了！再次谢谢

wenhua · 发表于 2015-5-8 09:23

问题彻底解决了，谢谢各位大家的热心，感谢高手的指点

林小林子 · 发表于 2017-11-2 19:16

vladimirputin · 发表于 2017-11-6 14:07

批量打印确实很不错，谢谢啊

账号		自动登录	找回密码
密码			注册

[建筑] lisp编程：请问高手们，CAD批量打印时能实现不弹出对话框、自动命名和保存吗？

评分