topic Re: Deleting specific text after a symbol in AutoCAD Forum

Deleting specific text after a symbol

Anonymous — Tue, 31 Aug 2021 03:17:55 GMT

I am trying to find a way to delete all the text after the "~" symbol. If there is a way I would really appreciate it, it will save a lot of time.

Thank you

Re: Deleting specific text after a symbol

ennujozlagam — Tue, 31 Aug 2021 04:35:46 GMT

ddedit command and pick the text and erase. thanks

Re: Deleting specific text after a symbol

ВeekeeCZ — Tue, 31 Aug 2021 06:42:48 GMT

Start with posting a dwg with example(s).

Also, do you mean to remove all the text behind a hyphen to the end of the line?

Re: Deleting specific text after a symbol

Anonymous — Tue, 31 Aug 2021 07:00:27 GMT

From the ~ to the end

Re: Deleting specific text after a symbol

Anonymous — Tue, 31 Aug 2021 07:01:39 GMT

Yes from behind the ~ to the end, sorry

Re: Deleting specific text after a symbol

Kent1Cooper — Tue, 31 Aug 2021 11:25:08 GMT

Is that one big Mtext object, or is each line a separate Text or Mtext object? [This kind of question is why a sample .dwg file is helpful.]

Re: Deleting specific text after a symbol

Kent1Cooper — Tue, 31 Aug 2021 12:00:32 GMT

@Anonymous wrote:

Yes from behind the ~ to the end....

If in each Text/Mtext object, try this:

(vl-load-com) (defun C:TDAT (/ ss n tobj txt); = Text: Delete After Tilde (if (setq ss (ssget "_:L" '((0 . "*TEXT") (1 . "*~*")))) (repeat (setq n (sslength ss)); then (setq tobj (vlax-ename->vla-object (ssname ss (setq n (1- n))))) (vla-put-TextString tobj (substr (setq txt (vla-get-TextString tobj)) 1 (1+ (vl-string-position 126 txt))) ); ...put... ); repeat ); if (princ) ); defun

But if your image is one Mtext object, and you want such deletions for every line in it, not just the whole thing after the first ~, that's another story [but also possible].

Re: Deleting specific text after a symbol

Anonymous — Tue, 31 Aug 2021 15:44:50 GMT

Every line is separate

Re: Deleting specific text after a symbol

Anonymous — Tue, 31 Aug 2021 15:51:23 GMT

Ah, thanks. What about if the whole thing is a block and I want it to do the same thing for every line?

Re: Deleting specific text after a symbol

Kent1Cooper — Tue, 31 Aug 2021 16:02:23 GMT

@Anonymous wrote:

.... What about if the whole thing is a block and I want it to do the same thing for every line?

Do you really mean the whole thing is a Block as AutoCAD uses the term, or the whole thing is "blocked together" as one Mtext object? It should be possible to do it either way, but the approaches would be very different.

Re: Deleting specific text after a symbol

Anonymous — Tue, 31 Aug 2021 16:24:09 GMT

It worked but I also the ~ symbol to delete aswell

Re: Deleting specific text after a symbol

Anonymous — Tue, 31 Aug 2021 16:37:48 GMT

Is blocked all together.

Re: Deleting specific text after a symbol

Kent1Cooper — Tue, 31 Aug 2021 16:42:32 GMT

@Anonymous wrote:

It worked but I also the ~ symbol to delete aswell

Then the Topic heading and Message 5 should be worded differently. But if that's what you need, change this line:

(substr (setq txt (vla-get-TextString tobj)) 1 (1+ (vl-string-position 126 txt)))

to this:

(substr (setq txt (vla-get-TextString tobj)) 1 (vl-string-position 126 txt))

And in the image, it looks like there are spaces before the ~'s. If you also want those spaces removed, that's possible.

Re: Deleting specific text after a symbol

jrreid — Tue, 31 Aug 2021 16:43:52 GMT

Easy for that, use Find Replace.

Type in Find.

Find What: Put your ~ (if you have spaces to remove put them as well)

Replace with: (DONT PUT ANYTHING)

Then select REPLACE ALL or Select the Blocks you want this to happen with.

If you already ran the lisp command and picked the blocks when you use find type P or Previous when selecting.

Hope this helps!

JRR.

Re: Deleting specific text after a symbol

Kent1Cooper — Tue, 31 Aug 2021 16:44:45 GMT

@Anonymous wrote:

Is blocked all together.

That leaves the same ambiguity as before. What is the object? Pick it and look at the top of the Properties palette. What does it say -- "Block Reference" or "Mtext" or something else?

Re: Deleting specific text after a symbol

Anonymous — Tue, 31 Aug 2021 16:55:17 GMT

Re: Deleting specific text after a symbol

Kent1Cooper — Tue, 31 Aug 2021 17:59:10 GMT

So inside the Block definition, are all the lines of text separate objects, or one Mtext object? Get into the Block with BEDIT or REFEDIT, and you can find out. If they're separate objects, are they in fact Text/Mtext, or are they Attribute definitions?

Re: Deleting specific text after a symbol

Anonymous — Tue, 31 Aug 2021 18:04:50 GMT

Not sure, but it looks like this.

Re: Deleting specific text after a symbol

Kent1Cooper — Tue, 31 Aug 2021 20:27:33 GMT

They appear to be Attributes. That would mean what you want to edit is the Attribute values in a particular insertion of that Block, not anything in the Block definition [what you're seeing are their tags]. FIND can do text replacements, but I don't think it can handle finding a particular character and deleting it and all that follows it, regardless of what that is. But I don't use Attributes very much, so it would take me some research to find a way to do what you want -- maybe someone else with more Attribute experience will jump in before I get around to it.

Re: Deleting specific text after a symbol

Anonymous — Tue, 31 Aug 2021 22:21:06 GMT

Okay, thank you very much. I appreciate the help, previous step will help a lot though in most circumstances.