Jully 发表于 2011-4-27 18:48:44

这段代码错在哪里？？？运行总是有错误

(vl-load-com)
(setq dwg (vla-add (vla-get-documents (vlax-get-acad-object)) ""))
(vla-put-activedocument (vlax-get-acad-object) dwg)

http://space.mjtd.com/xwb/images/bgimg/icon_logo.png 该贴已经同步到 Jully的微博

Andyhon 发表于 2011-4-27 19:50:50

用来连开启了数个文件 (drawing1.dwg drawing2.dwgdrawing3.dwg)
未见异常 ....
运行总是有错误 ?    讯息是什么?

Jully 发表于 2011-4-27 19:56:12

我在visuallisp环境下运行的，程序一直处于加载中，即运行不停止。若改为自动执行，就会看到循环的错误。

Jully 发表于 2011-4-27 20:05:10

;错误: 发生未知意外
; 警告: 忽略展开 未知异常
有时出现以上错误。

Jully 发表于 2011-4-27 20:14:20

(defun C:ck()
(vl-load-com)
(setq dwg (vla-add (vla-get-documents (vlax-get-acad-object)) ""))
(vla-put-activedocument (vlax-get-acad-object) dwg)
(command "circle" '(100 100) 20)
)直接加载，圆画不出来。

Andyhon 发表于 2011-4-27 21:11:33

本帖最后由 Andyhon 于 2011-4-27 22:28 编辑

...直接加载，圆画不出来。

不是画不出来,而是画在原先的那个文件内
Ref:
http://bbs.mjtd.com/thread-86289-1-10.html

Jully 发表于 2011-4-27 21:27:54

图文档置为当前，为什么不能操作？？如何来实现在当前文档操作？？

Andyhon 发表于 2011-4-27 21:54:53

先天限制 Ref:
http://bbs.mjtd.com/thread-86289-1-10.html

如何来实现在 当前 文档操作?

这个当前文档 指的应该是新文档吧
您不会单纯只是画个圆吧!

Ref: http://bbs.mjtd.com/forum-14-1.html
or
另一个是 脚本 Script (*.Scr)
这会是一个专题,得下功夫的一个专题
在帮助内 SearchScript

Jully 发表于 2011-4-28 08:56:29

是新文档，我要做一系列的操作的。这里只是测验。
http://bbs.mjtd.com/thread-86289-1-10.html中，执行 ( VLA-ACTIVATE (VLA-OPENDOCUMENT OBJ))就会置前，怎么理解应用，它能实现我要的功能吗？可以帮我解释一下参数代表的意义吗？

Andyhon 发表于 2011-4-28 09:21:48

本帖最后由 Andyhon 于 2011-4-28 09:22 编辑

(vla-put-activedocument (vlax-get-acad-object) dwg)
也只是置前而己
(command "circle" '(100 100) 20)
这个只对原文件生效 ....

您要实现的功能得另寻出路
(本然如此,非原生Lisp之所能也,)

页: [1] 2
查看完整版本: 这段代码错在哪里？？？运行总是有错误