Topic: SafeArray Helps

[velasquez]

I am not getting to work with the syntax for  (mapcar ´vla-put-layer ...
with Safearray and  SafeArray value 
Does anybody can me to help?

Thanks

[CAB]

Post what you have tried so far.

[velasquez]

(if (ssArray
      (= (type ssArray) 'safeArray)
;;;is the safeArray made of vlax-object's
      (= (vlax-safeArray-type ssArray) 9)
    ) ;_ fim de and
  (mapcar 'vla-put-layer
     (car (safeArray-value ssArray))
     "TestLayer"
  ) ;_ fim de mapcar
) ;_ fim de if

[CAB]

Would you mind explaining the bigger picture?
Most of the time a safearray is not needed, only a list.

[velasquez]

HI CAB 
I got to work with vla-put-layer using SSGET. 
But I need to learn more on Safearray.   
Does the function below use ' vla-delete how to work with vla-put-layer or vla-put-color?

 

Code: [Select]

;;;delete objects
  (if (and flag
   ssArray
   (= (type ssArray) 'safeArray)
;;;is the safeArray made of vlax-object's
   (= (vlax-safeArray-type ssArray) 9)
      ) ;_ fim de and
    (mapcar 'vla-delete (safeArray-value ssArray))
  ) ;_ fim de if

Thank you.