Find Text Mtext

[Sambuddy]

I am sure your question would be why not running a simple find command, but since I have so many blocks, my results would show 50 results each time - this is my way of simplifying the find command but no intention to replace - only to view.

 

Is there a way to partially find/ locate a text, example: KRE-800 10291 (101 2065)

if it could ignore <spaces> and not a perfect match rather partial match!

Thanks

(defun c:TEST (/ text ss)
(setvar 'dynmode 3)
(setvar 'dynprompt 1)
 (if (and (setq text (getstring T "\n  >>  Enter Antenna Model To Find: "))
          (setq ss (ssget "_x" (list '(0 . "TEXT,MTEXT") (cons 1 text)))))
     (sssetfirst nil ss)
 ) ;end if
(command "zoom" "o")  
(princ)
) ; end defun

 

[Lee Mac]

Change:

(cons 1 text)

to:

(cons 1 (strcat "*" text "*"))

 

[Sambuddy]

did not succeed since it works for some but not for others: I guess my antenna models are wack : TBXLHB-6565A-VTM OR Kathrein - PR-950 OR RVVPX305.10R OR DBXLH-8585A-VTM
I intended to just type say: 6565A and hopefully get TBXLHB-6565A-VTM or type DBXLH and get DBXLH-8585A-VTM. But nothing shows up.

 

This is another question:

Do you think there is a way for a list to be made so it could give suggestions as I type? since I would have 4 models for RVVPX305.10R XM R F and keeps changing for every model.

how about if all my Mtexts are on layer Tx-0-TXT colour 30. Do you think there is a way to collect names then as I type create suggestions?

 

Thanks

[pkenewell]

@Lee Mac NOTE: on MTEXT if the text is longer than 250 characters in the search, you would want to add in group code 3 as well. You would have to use the OR modifiers?

Edited December 5, 2019 by pkenewell