明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1795|回复: 2

怎么样得到想要的窗口

[复制链接]
发表于 2004-6-5 11:46:00 | 显示全部楼层 |阅读模式
<BR>如果当前的系统运行着两个(或以上)auto cad,使用下面的语句建立的AutoCAD的.Application对象,好象默认是指向最先打开的cad 窗口,那么怎样使新建的对象指向自己想要的窗口。AcadApp1Mdl = GetObject(, "AutoCAD.Application")






说详细些:我用语句:


ProcID = Shell("C:\Program Files\AutoCAD 2002\acad.exe e:/cad工程/qty25/图符/qty25模板.dwg ", AppWinStyle.NormalFocus)


打开了一个cad 图文件:qty25模板.dwg,然后想把这个图用下面的代码:设置给PaSpace1Mdl 对象,再进行操作。问题是,如果当前的系统中没有打开过cad 可以正常。可是如果已经有打开的cad 窗口,那么PaSpace1Mdl 就不是指向自己打开的cad窗口,而是指向先打开的cad 窗口。怎么解决这个问题。


AcadApp1Mdl = GetObject(, "AutoCAD.Application")<BR>                                                         If Err.Number &lt;&gt; 0 Then<BR>                                                                                         Err.Clear()<BR>                                                                                         AcadApp1Mdl = CreateObject("AutoCAD.Application")<BR>                                                                                         If Err.Number &lt;&gt; 0 Then<BR>                                                                                                                         MsgBox(Err.Description)<BR>                                                                                         Exit Sub<BR>                                                                                         End If<BR>                                                         End If


                                                         AcadApp1Mdl.Visible = True<BR>                                                         AcadDoc1Mdl = AcadApp1Mdl.ActiveDocument<BR>                                                         MoSpace1Mdl = AcadDoc1Mdl.ModelSpace<BR>                                                         PaSpace1Mdl = AcadDoc1Mdl.PaperSpace


还有一个问题:怎样得到cad 的安装路径,用来替换下面的 “C:\Program Files\AutoCAD 2002”?
ProcID = Shell("C:\Program Files\AutoCAD 2002\acad.exe e:/cad工程/qty25/图符/qty25模板.dwg ", AppWinStyle.NormalFocus)
发表于 2004-6-5 18:38:00 | 显示全部楼层
应该用CreateObject,然后使用得到的对象来打开文件,不要用shell
 楼主| 发表于 2004-6-7 15:25:00 | 显示全部楼层
哦,我明白了。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-11-6 10:02 , Processed in 0.178479 second(s), 25 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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