Quick question about block insertion point

[ziele_o2k]

Hi,

I'm playing with blocks data extraction. I just want to be sure.

The best way to get block insertion point in WCS/UCS is:

For ename:

(trans (cdr (assoc 10 (entget _ent))) _ent 0) ;WCS
(trans (cdr (assoc 10 (entget _ent))) _ent 1) ;UCS

For vla-object:

(vla-get-InsertionPoint _obj) ;WCS
(trans (vla-get-InsertionPoint _obj) 0 1) ;UCS

[hanhphuc]

(vla-get-InsertionPoint _obj)

not sure if ac2018 trans can pass argument as variant value?

 

(vlax-get _obj 'InsertionPoint)

This returns a list

[ziele_o2k]

Ofcourse, vla-get-InsertionPoint returns variant.

That was only mental shortcut.

Correct version is:

 (vlax-safearray->list(vlax-variant-value(vla-get-InsertionPoint  _obj)))

[dlanorh]

(vlax-get _obj 'insertionpoint)

will return a list