如何向多个文件发送命令？

shh_188

小弟在做一个程序，需要向多个文件发送几个命令。
譬如说，_wipeout _f off

之前考虑过用lisp生成一个.scr的脚本，用script命令来执行。
但是，因为在执行过这个命令后，程序还需要有后续的各种操作，无法对script命令的异步操作进行等待。

也试过用vla-SendCommand函数，但是很莫名的无法把wipeout命令发送出去，真心不明白是怎么回事。

想请问各位大神，有没有什么方法，来对多个文件发送CAD的命令过去呢？

Gu_xl

Lisp的生命周期只在加载它的当前文挡!用命令行命令，脚本是一个选择！也可以采用objectdbx方法！

shh_188

请问G版能给个实例吗？
因为objectdbx是完全没接触过，我只会AutoLisp和一些简单的VisualLisp，但是这个操作在程序里又特别特别需要。

Gu_xl

shh_188 发表于 2014-6-16 20:48
请问G版能给个实例吗？
因为objectdbx是完全没接触过，我只会AutoLisp和一些简单的VisualLisp，但是这个操 ...

论坛力有相关例子，艘一下看看！我的艘弧博客力也有相关例子！

nzl1116

lisp完全可以办到，建议楼主仔细学习一下，帮助文档中关于多文档之间的操作。

shh_188

Gu_xl 发表于 2014-6-16 20:55
论坛力有相关例子，艘一下看看！我的艘弧博客力也有相关例子！

好的，马上去你的搜狐博客里看看。

下午在论坛里搜了半天，不知道是不是没搜对，死活没找到需要的

shh_188

nzl1116 发表于 2014-6-16 21:02
lisp完全可以办到，建议楼主仔细学习一下，帮助文档中关于多文档之间的操作。

各种帮助文档看了也不少
只会AutoLisp的人伤不起啊，一堆vla开头的越看越晕

Andyhon

...无法对script命令的异步操作进行等待...

Resume 是 script 还魂接续大法

scr1    ; Line , Arc 指的是 Script 内的叙叙述句
scr2    ; Line , Arc 指的是 Script 内的叙叙述句
...     ; 指的是 Script 内的叙叙述句
(LispProc)    ;  调用的 Lisp 程序
过桥          ; 这是 scr3 回应 lispProc 的第一个互动出错回应值
              ; 脚本中断 --> 重新正确回应 lispProc 应答值
              ; LispProc 进行到底 (确保此中不再出错)
Resume   ; 交还脚本 继续 ....


大略如此,谨供参考

shh_188

Andyhon 发表于 2014-6-16 21:20
...无法对script命令的异步操作进行等待...

Resume 是 script 还魂接续大法

是指resume命令吗？
这个不是我要的，我并不是要在中断了Script脚本后，再继续执行

我是需要Lisp程序中进行脚本执行，此时Lisp程序不执行后续的代码，一直等到Script脚本执行完以后再继续Lisp后面的代码

nzl1116

shh_188 发表于 2014-6-16 21:33
是指resume命令吗？
这个不是我要的，我并不是要在中断了Script脚本后，再继续执行

多文档之间的操作就是跟你想的一样，当lisp把控制权交给另外一个文档时，它就停止执行，一直到那个文档执行完，把控制权交还给先前的文档后，lisp就继续执行剩下的表达式。