Convert vla-insertionpoint to autolisp list

[ollie]

The title says it all

 

Any thoughts

 

Thanks

[lpseifert]

maybe something like this?

(setq obj (vlax-ename->vla-object (car (entsel)))
     var (vla-get-insertionpoint obj)
      sa (vlax-variant-value var)
  ip-lst (vlax-safearray->list sa)
)

[ollie]

maybe something like this?

(setq obj (vlax-ename->vla-object (car (entsel)))
     var (vla-get-insertionpoint obj)
      sa (vlax-variant-value var)
  ip-lst (vlax-safearray->list sa)
)

 

Thanks that is ideal. I tried this method earlier without the variant value and it didn't work

[Lee Mac]

Another way:

 

(vlax-get Obj 'InsertionPoint)

[lpseifert]

Another way:

 

(vlax-get Obj 'InsertionPoint)

Hey! No fair using undocumented functions!

Where do you find these?

[Lee Mac]

 

I don't know tbh, you just pick them up as you go - from other peoples code etc.

[lpseifert]

That's a good one... works for all available properties (from Dump)?

[Lee Mac]

That's a good one... works for all available properties (from Dump)?

 

Yeah, just an alternative to the usual. I haven't had a problem with it yet, although there are bugs out there where some methods/properties respond to different functions in different ways.

 

Lee

[lpseifert]

Thanks Lee