Glen Smith 发表于 2022-7-6 07:25:00

对于每个布局,做些什么

我试图修改我在这里找到的一些代码:http://www.cadtutor.net/forum/showthread.php?62876-能否同时更改多个图纸打印设置&高亮显示=打印+多个+布局
 
这是为了将当前图形中的所有布局打印到我的命名打印机。没有setvar行,我得到了正确数量的副本,但它们都是相同的布局(无论从哪一个执行lisp)。将setvar行错误添加到lisp中。
 
(实际的plot命令被注释掉了,所以我在调试此代码时不会一直浪费纸张。)
 
谁能帮我解释一下吗?
谢谢
格伦

Bill Tillman 发表于 2022-7-6 07:52:52

我刚开始做一个类似的任务,打印成PDF文件。您是否设置了一个监视窗口,以查看“x”在循环中迭代时实际设置的值。

MSasu 发表于 2022-7-6 08:03:48

LAYOUTLIST函数返回一个包含可用布局名称的列表:
(setq layoutOld (getvar "CTAB"))
(foreach layoutCrt (layoutlist)
(setvar "CTAB" layoutCrt)
;your action here
)
(setvar "CTAB" layoutOld)

MSasu 发表于 2022-7-6 08:11:45

要修复原始代码,需要从VLA对象中检索布局的名称;请检查VLA-GET-NAME。不要错过一个事实,即VLA-GET-LAYOUTS函数也会返回一个包含模型选项卡的列表;你可能想把它过滤掉。
2

Glen Smith 发表于 2022-7-6 08:25:33

和这满足了我的需要!非常感谢米尔恰。
 
我确实在x上有一块手表,我可以看到它不是一个清晰的布局名称文本,但我不知道如何从#获得
要做的事情太多了,实际上学习LISP对于完成这个项目来说似乎总是处于次要地位。
 
格伦
页: [1]
查看完整版本: 对于每个布局,做些什么