Searching for "empty" text strings

I am coding an app the will initially search and delete "empty" text strings on a specific layer....any suggestions..should I use DXF group codes?

 

Search this NG, there has been some talk about this, and some programs have been written.

Tim

 

(setq ss (ssget "X" (list (cons 0 "*TEXT") (cons -4 "<OR") (cons 1 "") (cons
1 " ") (cons 1 " ") (cons -4 "OR>"))))

will find all text or mtext with blank, 1 space or 2 spaces in the text.

 

Something like this...

(SSGET "X" '((0 . "TEXT")(8 . "0")(-4 . "<OR")(1 . " ")(1 . "")(-4 . "OR>")))

will find all empty text strings on layer "0".

 

You actually only need (1 . "") and (1 . " ")
It will find all empty strings, no matter how many spaces.

 

You could even condense that a little

(ssget "x" '((0 . "MTEXT,TEXT") (1 . ", ")))

PS: Thanks again, John.

 

even shorter
(ssget "x" '((0 . "*TEXT") (1 . ", ")))

 

That is fine if you can be sure there will no chance of a
custom text object. I prefer not to make that assumption.

 

That should be "Thanks, Steve." But watch out. Any MTEXT that has any
formatting embedded will be excluded. The version of KILLDOTS included free in
my evaluation versions (CVR15.EXE + CVR16.EXE) will filter through all the mtext
and see if the unformatted string matches ", ". I'm pretty sure that KILLDOTS
and a few others will keep working after the evaluation period has expired. I
do need to upgrade it to interpret tabs.