lichunling 发表于 2006-6-29 22:32:00

怎么实现VB程序在CAD中的自动加载

我编写了一个VB程序,并且把它生成了exe文件,怎么实现在CAD打开时它的自动加载呢,请各位斑竹、大侠指教，别不理我，谢谢！

alin 发表于 2006-6-30 06:59:00

You can't "load" it since it is not a .dvb project file. However, you can run it with the function (startapp).

lichunling 发表于 2006-6-30 11:12:00

<P>我想先做一个简单的例子按照你的建议试一下,但对这个函数的用法不清楚,执行后没结果，请帮我看看。</P>
<P>(defun c:gch1()<BR>(startapp "visual basic 6.0" "C:\Documents and Settings\zxj\桌面\工程1.exe")<BR>)</P>

hhc 发表于 2006-6-30 12:20:00

这样就可以:(startapp&nbsp; "C:\Documents and Settings\zxj\桌面\工程1.exe")<BR>

hhc 发表于 2006-6-30 12:25:00

<P>要实现自动加载,还要把下列程序放在启动组中或其他可以自动加载的文件里,如acad2004.lsp之类.</P>
<P>(defun c:gch1()<BR>&nbsp;&nbsp; (startapp&nbsp; "C:\Documents and Settings\zxj\桌面\工程1.exe")<BR>)</P>

lichunling 发表于 2006-6-30 17:00:00

<P>按你的意见改后,执行结果仍然是nil,不知道错误出在哪里?工程1的位置和属性也都对.</P>

alin 发表于 2006-6-30 22:18:00

(startapp&nbsp; "C:\\Documents and Settings\\zxj\\桌面\\工程1.exe")<BR>

lichunling 发表于 2006-7-1 09:12:00

<P>各位大侠结果仍然是nil,不对呀.我把例子传上请帮我试一试.</P>

hhc 发表于 2006-7-1 16:13:00

呵呵,看到了,你的路径分隔符中有一个是单反斜杠,而Lisp要求双反斜杠或单正斜杠.我上面写的也有误,直接从你的发言里拷过来,没检查.7楼斑竹写的全对.

lichunling 发表于 2006-7-3 15:58:00

太好了,谢谢各位的支持,7楼斑竹写的全对,是我后来再试的时候,斜杠没弄对,现在改正后,已经能实现VB窗体的调用。这样我可以用VB设计界面了,然后用LISP实现界面在CAD中的调用。
页: [1]
查看完整版本: 怎么实现VB程序在CAD中的自动加载