Bryco 发表于 2007-8-28 02:44:52

复制图层特性ObjectDBX

有没有办法用#160;使用ObjectDBX将属性从一个文档视口切换到另一个

Bryco 发表于 2007-8-28 09:59:45

Humbertogo,I'我对你的问题没有把握
如果要冻结视口中的层,请在视口中添加扩展数据。所以它#039;这是可能的。

Bryco 发表于 2007-8-28 10:22:00

在我的程序中,我导入了一个;使用ObjectDBX进行布局,但我需要知道哪些层在视口中被冻结(布局)

Bryco 发表于 2007-8-29 11:13:53

这比我想象的要复杂
我认为你最好先创建pviewport,然后添加尝试复制pviewport的扩展数据Sub CopyVpLayerStates(Vp As AcadPViewport, NewVp As AcadPViewport, NewDoc As AcadDocument)
    Dim Doc As AcadDocument
    Dim Xd, Xv

    Vp.GetXData "Acad", Xd, Xv
    NewVp.SetXData Xd, Xv
    NewVp.Update
    NewDoc.MSpace = False
    NewVp.Display (False)
    NewVp.Display (True)
    NewDoc.MSpace = True
   
End Sub
页: [1]
查看完整版本: 复制图层特性ObjectDBX