请教.LISP打开图形文件后如何继续执行

VBALISPER · 发表于 2012-9-3 22:02:41

我想请教一下，能不能在已打开一张CAD图,运行了LISP命令后(程序未完),用什么变通的方法用LISP实现打开一张新图如drawing1，LISP程序继续运行,然后在新图上画东西。也就是执行LISP程序---打开一张新图---在新图上继续运行LISP程序至程序结束.
我以前是用这个VBA代码的功能ThisDrawing.Application.Documents.Open (strFilePath1), 1实现的,现在想做成LISP

如何实现,请各位大侠相助.谢谢了

该贴已经同步到 VBALISPER的微博

669423907 · 发表于 2019-9-14 14:50:49

本帖最后由 669423907 于 2019-9-14 14:53 编辑

可以借助第三方，如vbs：
1：用lsp把要打开的图档的名字写进系统粘帖板里
2：建一个vbs，如A.vbs
3：vbs延时1~2秒，因为CAD打开文件要时间。vbs读取粘帖板，得到图档的名字，vbs判断当前标题是否包含图档的名字，如果包含，则发送按键（lsp程序的快捷键）

zcl_() · 发表于 2022-12-26 19:37:32

VBALISPER 发表于 2022-12-12 19:48
没有。最后变通处理了。直接在原图上处理，绘图，再另存为新图。不改动原图。

用非模态对话框，里面的切换事件可以做。当主文档切换的时候，会引发切换事件，在切换事件里面加载相应的代码。

zcl_() · 发表于 2022-12-12 17:00:26

669423907 发表于 2019-9-14 14:50
可以借助第三方，如vbs：
1：用lsp把要打开的图档的名字写进系统粘帖板里
2：建一个vbs，如A.vbs

大佬，能不能做个列子看一下呐？

Gu_xl · 发表于 2012-9-3 22:29:22

不用想了，基本上没有可能！

mandala · 发表于 2012-9-4 10:02:20

你做梦！！！！

VBALISPER · 发表于 2012-9-4 10:35:08

Gu_xl 发表于 2012-9-3 22:29
不用想了，基本上没有可能！

你都这样说了,看来是真没法了.这不是LISP最大的缺点吗

ForYang · 发表于 2019-9-12 15:06:19

一直卡在这里了，楼主解决这个问题了吗？

zcl_() · 发表于 2022-12-12 18:23:40

老哥，你这个问题解决了么？

VBALISPER · 发表于 2022-12-12 19:48:14

zcl_() 发表于 2022-12-12 18:23
老哥，你这个问题解决了么？

没有。最后变通处理了。直接在原图上处理，绘图，再另存为新图。不改动原图。

gzcsun · 发表于 2022-12-15 08:20:02

调用scr

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

请教.LISP打开图形文件后如何继续执行

相关帖子

点评