The LayerFrozen() pseudo-property deals with one layer
at a time.
The FrozenLayers() property (takes/returns a variant
containing an Array of AcadLayer objects) allows you
to specify all frozen layers (exclusively):
Dim Layers(0 to 2) As Variant
Set Layers(0) = ThisDrawing.Layers("walls")
Set Layers(1) = ThisDrawing.Layers("doors")
Set Layers(2) = ThisDrawing.Layers("windows")
Dim VPort As AcadXPViewport
Set VPort = new AcadXPViewport
VPort.Viewport = ThisDrawing.ActivePViewport
VPort.FrozenLayers = Layers
If you want to freeze/thaw multiple layers in addition
to those that are already frozen/thawed (inclusively),
then the AcadXApplication object has methods that take
an array of AcadLayers:
GetFrozenViewportLayers(Viewport As Object) As Variant
FreezeLayersInViewport(Viewport As Object, Layers As Variant)
ThawLayersInViewport(Viewport As Object, Layers As Variant)
--
AcadXTabs: Document Tabs for AutoCAD
http://www.acadxtabs.com
"Tony Burba" wrote in message news:8312F64AA74A8DA66371A533B91B307E@in.WebX.maYIadrTaRb...
> Question (and slap me if I'm off base here):
>
> Seems to me that the last time I looked at ActiveX for this function, you
> had to feed it one layer at a time (as opposed to feeding an array of layers
> to the asdkunsupp function). Since each layer set off a regen, you could sit
> around for a long time freezing 50 or so layers.
>
> Is this still the case, or was I mistaken in the first place?
>
>
> "Tony Tanzillo" wrote in message
> news:E129328E0B3CD20395150A992A51AFD4@in.WebX.maYIadrTaRb...
> > The AcadX ActiveX Extensions (www.caddzone.com/acadx) have
> > methods that allow you to freeze/thaw layers in viewports.
> >
> > See the AcadXPViewport class
> >
> > --
> > AcadXTabs: Document Tabs for AutoCAD
> > http://www.acadxtabs.com
> >
> >
> > "tsigwing" wrote in message
> news:f18cf4b.3@WebX.maYIadrTaRb...
> > > Well don't tease me like that...watcha got to do?
> >
> >
>
>
