TextStyle Purge with Lisp

Hi,

In AutoCAD, there is always a textstyle that we can't purge.
Its the first textstyle created.

When there is more than one textstyle in the drawing, is there a way to change the property of that first textstyle created that I can be able to purge it ??

Thanks.

 

If you're talking about the "Standard" style, you can't purge that. (I'm
not sure, but you might be able to rename it, so it might not be called
that.) Also, make sure the style in question isn't the current text style
(the various text commands tell you what's current in their opening
prompts) -- even if there are no text entities using it, you still can't
purge it if it's current.

 

Tested in A2k4:

1. DimStyles:

1.1 you can -purge (command line) or rename all DimStyles
regardless of position in dimstyle table with the
rename command or Dimstyle command

1.2 you cannot rename the DimStyle "Standard" with entmod

1.3 if you rename the DimStyle "Standard" with the rename
command or Dimstyle command, now you can rename it
with entmod and purge it with dialog PURGE command


2. Styles (text):

2.1 you can rename all Styles with the rename command

2.2 you cannot rename the first entry of style table
with Style command

2.3 you cannot purge the first entry of style table

2.4 you cannot rename the Style "Standard" with entmod

2.5 if you rename the Style "Standard" with the rename
command, now you can rename it with entmod

---

See also: ""Standard" tblobjname(s)" - posted in 2001?

From AutoCAD 2004 docs:

The following entries may not be renamed [ (with entmod) ]
but are otherwise modifiable, subject to restriction:

Symbol table entries that cannot be renamed
Table Entry name
STYLE STANDARD
DIMSTYLE STANDARD
BLOCKS *MODEL_SPACE
BLOCKS *PAPER_SPACE
APPID No entries may be renamed



--------------------------------------------------
Purge notes
--------------------------------------------------

In >A2k2:


1. you can purge all nested obects with one pass
with:

1.1 Purge command dialog

1.2 (command "_.PURGE" "_ALL" "*" "_N") < "_N"



2. with:

(vla-purgeall (vla-get-activedocument (vlax-get-acad-object)))
or
(command "._PURGE" "_All" "*" "_YES") < "_YES"

you purge only on level a time


Note: (command "._PURGE" ...) is equivalent to -purge
command line

See also: "Purge vs. vla-purgeall" posted in 2001?




--

Marc'Antonio Alessi
http://xoomer.virgilio.it/alessi
(strcat "NOT a " (substr (ver) 8 4) " guru.")

--