明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1391|回复: 6

求助:ActiveX exe如何挂载指定pid的cad进程

[复制链接]
发表于 2017-9-29 09:36 | 显示全部楼层 |阅读模式
如题,请教各位大神:
ActiveX exe挂载cad时,似乎只能默认加载最后一次启动的cad进程。若开了3个cad,如何让ActiveX exe挂载指定pid的cad(如第2个进程),而不是默认的那个cad进程呢?
希望各位走过路过的大神,不吝赐教!
发表于 2017-10-1 17:43 | 显示全部楼层
以前我在CAD8的时候碰到有人 问 这个 问题 。
我把以前的答案复制过来了,请参考一下!(也适用于EXCEL)

开始以为很简单,但是自己实验了一下发现是个难题,因为VB获得对象函数只能是获得第一个实例,后来搜索了各种资料,终于解决这个难题了,目前在网上还没有看到解决的方法。这是本论坛首发,与大家共同分享,可以任意转载。

可以按如下方法操作解决问题,比如打开了C:\TEST.DWG,C:\TA.DWG等等
引用方法就是加上文件名,一定要绝对路径才行。
SET CADDOC=GetObject("C:\TEST.DWG").Application
回复 支持 1 反对 0

使用道具 举报

发表于 2017-9-30 11:07 | 显示全部楼层
不行的,研究了很久都没有结果,放弃吧。
发表于 2017-9-30 13:07 | 显示全部楼层
用VB6进行Autocad的二次开发(原创)

楼主看看这个帖子99楼--->101楼,看是否有点作用
发表于 2017-10-7 17:36 | 显示全部楼层
回帖是一种美德!感谢楼主的无私分享 谢谢
 楼主| 发表于 2017-11-8 09:54 | 显示全部楼层
vbcad 发表于 2017-10-1 17:43
以前我在CAD8的时候碰到有人 问 这个 问题 。
我把以前的答案复制过来了,请参考一下!(也适用于EXCEL)
...

非常感謝您的回復!你的答案最為詳盡,看樣子錯不了,有空了試驗一下。
萬分感謝!
 楼主| 发表于 2018-8-23 11:53 | 显示全部楼层
vbcad 发表于 2017-10-1 17:43
以前我在CAD8的时候碰到有人 问 这个 问题 。
我把以前的答案复制过来了,请参考一下!(也适用于EXCEL)
...

非常感谢你的帮助!
经过试验确实有效。
但如果打开的图,不管vb程序一直开着还是关了再开,只要这张图不关,再创建对象时就会多弹出一个是否保存新建文件的对话框,请问这个有好的解决方法吗?对话框点确定或取消效果都一样。
创建对象代码:
Public acadApp As Object, ThisDrawing As Object
Set acadApp = GetObject(Text1.Text).Application
重开程序再次获取同一对象,【Set acadApp = GetObject(Text1.Text).Application】就会出现此对话框,有点烦人。以下是弹出框的内容
---------------------------
AutoCAD
---------------------------
是否将改动保存到 Drawing2.dwg?
---------------------------
是(Y)   否(N)   取消   
---------------------------
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-3-29 15:52 , Processed in 0.212849 second(s), 24 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表