Topic: copy layer properties ObjectDBX

[Humbertogo]

is there a way to copy layer with  properties from one doc Viewport to another using
ObjectDBX

[Bryco]

Humbertogo, I'm not sure about your question.
If you want to freeze layers in a viewport you add xdata tp the viewport. So it's possible.

[Humbertogo]

in my program i importing a  Layout using ObjectDBX
but i need to know witch layer are freeze in the viewport
(Layout)

[Bryco]

This is trickier than I thougth it would be.
I think your are better making the pviewport then add the xdata that trying to copy the pviewport

Code: [Select]

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