object DCL的问题

CADghost · 发表于 2004-7-5 12:00:00

请问,我已经复制objectDCL2004.arx以CAD支持的目录中了,LSP程序也关联了,为什么在加载了LSP后,输入命令什么响应也没有?发生这种情况,可能是什么原因呢?

meflying · 发表于 2004-7-5 13:16:00

没有加载这个ARX，或者这个ARX不适合你的CAD版本

Student · 发表于 2004-7-5 13:17:00

进入Vlisp环境，在调试状态下执行你的lsp程序。
看看问题出在那里。

CADghost · 发表于 2004-7-5 14:36:00

我在(princ)的上一行加了一条(setq a 1)最后运行完毕，a的值就是1了。
我用的是2004,没错呀，
LSP程序如下，
;主程序: ObjectDCL对话框驱动程序的最基本结构
(defun C:MyHello()
;确保将ObjectDCL.arx 载入 AutoCAD
(if (not (member "objectdcl.arx" (arx)))
(arxload "objectdcl.arx" "加载objectdcl.arx 失败.")
)

;加载对话框odc文件
(ODcl_LoadProject "MyHello")

;显示DclForm1对话框
(Odcl_Form_Show "MyHello" "DclForm1")
(princ);
)
也是完全照搬

meflying · 发表于 2004-7-5 16:43:00

2004加载的应该是objectdcl2004.arx吧

CADghost · 发表于 2004-7-5 18:35:00

对呀，没错，我就是把它复制到support

wzh · 发表于 2004-7-5 21:01:00

你的MyHello.odc没有做好，（VarName）下应该是MyHello_DclForm1而不是Untitled_DclForm1。
试试看。

CADghost · 发表于 2004-7-6 07:38:00

是啊，我真的没有设varname，我以为没有变量就没有什么用呢？！！！

meflying · 发表于 2004-7-6 08:26:00

晕，什么叫没错？？？你看看你的程序，加载的是objectdcl.arx，而我说的是要加载objectdcl2004.arx。。。。

CADghost · 发表于 2004-7-8 21:28:00

(defun C:MyHello()
(if (not (member "objectdcl2004.arx" (arx)))
(arxload "objectdcl2004.arx" "加载objectdcl2004.arx 失败.")
)

(ODcl_LoadProject "MyHello")

(Odcl_Form_Show "MyHello" "DclForm1")
(princ);
)
一样没反应!

object DCL的问题

发表回复

精选推荐