乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 101|回复: 6

2006年dvb 2007年?

[复制链接]

55

主题

197

帖子

8

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
416
发表于 2007-2-16 13:12:07 | 显示全部楼层 |阅读模式
在ACAD2006中创建的dvb文件在2007中可以工作吗?

本帖以下内容被隐藏保护;需要你回复后,才能看到!

游客,如果您要查看本帖隐藏内容请回复
回复

使用道具 举报

14

主题

78

帖子

1

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
134
发表于 2007-2-16 13:13:43 | 显示全部楼层
是的,除非你做了一些疯狂的事情
发布它,我会为你尝试
回复

使用道具 举报

154

主题

1274

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1936
发表于 2007-2-17 15:41:55 | 显示全部楼层
我必须更改DVB的引用才能使用Acad 2007:Autocad/Objectdbx Common 16.0类型库必须替换为Autocad/Objectdbx Common 17.0类型库。
回复

使用道具 举报

55

主题

197

帖子

8

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
416
发表于 2007-2-17 18:14:49 | 显示全部楼层
让dvb文件跨多个版本工作的问题之一是早期绑定。如果您要使用VBA或AutoCAD类型库以外的特定类型库,如果您进行后期绑定,它将使程序更具可移植性。大多数类型库允许您选择基本版本,操作系统将跟踪最新版本。
例如,如果我想获得对AutoCAD 2007的引用,我可以使用
但是如果我想让代码在任何版本上运行,我会使用
  1. Set Acad = GetObject(,"AutoCAD.Application")

我希望那是清晰的...
回复

使用道具 举报

154

主题

1274

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1936
发表于 2007-2-19 10:31:03 | 显示全部楼层
感谢大家的回复!我对VBA很陌生。
Keith,所以我可以(应该)在模块中设置它们,而不是在工具/引用/对话框中设置“硬”引用?
现在我引用了ObjectDBX 16.0类型库,并在模块中使用以下语句
  1. Dim dbxDoc As AxDbDocument

所以我应该删除引用并添加以下内容:

回复

使用道具 举报

55

主题

197

帖子

8

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
416
发表于 2007-2-19 10:59:22 | 显示全部楼层
简而言之...是的...除了您需要为ObjectDBX库使用“GetInterfaceObject”。
因此...在本例中,您只需要运行应用程序,而不需要添加任何对类型库的引用。
  1. Sub Test()
  2.     Dim ACDbx As Object
  3.     Dim Block As AcadBlock
  4.     Set ACDbx = GetInterfaceObject("ObjectDBX.AxDbDocument")
  5.     ACDbx.Open ("c:\test.dwg")
  6.     For Each Block In ACDbx.Blocks
  7.         MsgBox Block.Name
  8.     Next
  9.     Set ACDbx = Nothing
  10. End Sub

但是...答案并不总是那么简单,因为并非所有库都适用于所有版本的AutoCAD,但是如果您以编程方式设置引用,它会从计算机上的当前版本加载类,而不是尝试从开发计算机加载类。
哦...而且您本身并没有加载ObjectDBX对象,您实际上加载了文档界面,然后打开了您想要的文档操纵。
回复

使用道具 举报

154

主题

1274

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1936
发表于 2007-2-23 13:36:46 | 显示全部楼层
谢谢基思,我会试试看!
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-7-7 09:50 , Processed in 1.120981 second(s), 67 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表