乐筑天下

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

复制图层特性对象DBX

[复制链接]

34

主题

118

帖子

1

银币

后起之秀

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

铜币
254
发表于 2007-8-28 02:44:52 | 显示全部楼层 |阅读模式
有没有办法使用ObjectDBX将具有属性的图层从一个文档视口复制到另一个文档
视口

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

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

使用道具 举报

170

主题

1424

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
2119
发表于 2007-8-28 09:59:45 | 显示全部楼层
温贝托戈,我不确定你的问题。
如果要冻结视口中的图层,请在视口中添加 xdata tp。所以这是可能的。
回复

使用道具 举报

34

主题

118

帖子

1

银币

后起之秀

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

铜币
254
发表于 2007-8-28 10:22:00 | 显示全部楼层
在我的程序中,我使用ObjectDBX导入了一个布局,但是我需要知道哪个层在视口中被冻结
回复

使用道具 举报

170

主题

1424

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
2119
发表于 2007-8-29 11:13:53 | 显示全部楼层
这比我想象的要棘手。
我认为您最好制作pviewport,然后添加尝试复制pviewport的xdata
  1. Sub CopyVpLayerStates(Vp As AcadPViewport, NewVp As AcadPViewport, NewDoc As AcadDocument)
  2.     Dim Doc As AcadDocument
  3.     Dim Xd, Xv
  4.     Vp.GetXData "Acad", Xd, Xv
  5.     NewVp.SetXData Xd, Xv
  6.     NewVp.Update
  7.     NewDoc.MSpace = False
  8.     NewVp.Display (False)
  9.     NewVp.Display (True)
  10.     NewDoc.MSpace = True
  11.    
  12. End Sub
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-7-6 01:01 , Processed in 0.759184 second(s), 60 queries .

© 2020-2025 乐筑天下

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