Block's name to FIELD (based on existing lisp)

[Lee Mac]

Thanks Tom, but I cannot spend all my time coding for people without renumeration...

 

Lee

[tomjas]

Hi Lee,

 

I agree.

 

Thanks for helping me with this one.

[Brockster]

I just needed something like this myself to create a new block library. Thanks!

[saikoduri]

I want to place block name in UPPERCASE format. Please let me know.

Thanks in advance

[rrulep]

Hi lee,

 

 

What if I just need the x coordinate?

I change this line:

(LM:GetObjectID doc (vlax-ename->vla-object e)) ">%).Insertionpoint>%"

to:

(LM:GetObjectID doc (vlax-ename->vla-object e)) ">%).Insertionpoint\f "%lu6%pt1">%>%"

to get the x value but it doesn't create field.