Topic: vla-put-? how do I list the options available?

[CAB]

Here is another way to use VLIDE:
http://www.theswamp.org/index.php?topic=19612.msg242547#msg242547

[Kerry]

You can play with this too:

Code: [Select]

(setq ValuesList (list "ST00" "CONTINUOUS" 8 "60" "Layer Description ST00"))
(mapcar
  '(lambda (prop value)
     (vlax-put-property obj prop value))
   (list 'linetype 'color 'lineweight 'description)
   (cdr ValuesList)
 )

Yep, thats pretty economical

[Kerry]

Another advantage of looking at the object using
(vlax-dump-object objxx t)
is that you can see the READ ONLY properties listed ... that info saves beating the head against a wall sometimes

[KewlToyZ]

If you use the vlide and inspect the Vla-Object, you'll see all the other goodies.

...
trying to find the vla-put- for (plot / no plot)
vla-put-plottable wasn't it,
; error: ActiveX Server returned an error: Parameter not optional
tried plot and noplot
Sifting through help files right now too.
Mainly I wanted to access every varation possible for the new layer management systems including noplot & reconcile as well.

(vla-put-plottable layer :vlax-true or :vlax-false)

Thanks a lot for getting me into these.

Code: [Select]

Command: (vlax-dump-object(vlax-ename->vla-object (tblobjname "layer" "0"))T)
; IAcadLayer: A logical grouping of data, similar to transparent acetate
overlays on a drawing
; Property values:
;   Application (RO) = #<VLA-OBJECT IAcadApplication 00cbef78>
;   Description = ""
;   Document (RO) = #<VLA-OBJECT IAcadDocument 0158f5d0>
;   Freeze = 0
;   Handle (RO) = "10"
;   HasExtensionDictionary (RO) = -1
;   LayerOn = -1
;   Linetype = "Continuous"
;   Lineweight = -3
;   Lock = 0
;   Material = "Global"
;   Name = "0"
;   ObjectID (RO) = 2129665152
;   ObjectName (RO) = "AcDbLayerTableRecord"
;   OwnerID (RO) = 2129665040
;   PlotStyleName = "Color_7"
;   Plottable = -1
;   TrueColor = #<VLA-OBJECT IAcadAcCmColor 0cc17440>
;   Used (RO) = -1
;   ViewportDefault = 0
; Methods supported:
;   Delete ()
;   GetExtensionDictionary ()
;   GetXData (3)
;   SetXData (2)
TPossibly the fact I used 1 & 0 when it needed a negative. Going to ply with this some more.
Thanks for the new toys!!

[ronjonp]

Glad to help