Is there a Lisp routine to change multiple individual strings of DTEXT to Individual strings of MTEX

Discussion in 'AutoCAD' started by Albert Giuliano, Aug 8, 2003.

  1. Is there a Lisp routine to change multiple individual strings of DTEXT to
    Individual strings of MTEXT? TIA
     
    Albert Giuliano, Aug 8, 2003
    #1
  2. Albert Giuliano

    Paul Turvill Guest

    Select them individually.
    ___
     
    Paul Turvill, Aug 8, 2003
    #2
  3. "Select them individually."

    Thanks for this suggestion also, but...

    End result is still the same. 20 strings of DTEXT + TXT2MTXT = is Still 1
    String of MTEXT.
    TIA
     
    Albert Giuliano, Aug 8, 2003
    #3
  4. Albert Giuliano

    Paul Turvill Guest

    TXT2MTXT
    <<select ONE text object>>
    <<enter>>
    <<enter>> -- to repeat command
    <<select ONE text object>>
    <<enter>>
    <<enter>>
    etc.

    ....or try this:

    (defun C:TX2MT (/ ss n)
    (setq ss (ssget '((0 . "TEXT")))
    n (1- (sslength ss))
    );;setq
    (while (>= n 0)
    (setq ename (ssname ss n)
    n (1- n)
    );;setq
    (command "txt2mtxt" ename "")
    );;while
    (princ)
    );;defun
    ___
     
    Paul Turvill, Aug 8, 2003
    #4
  5. Thankyou, I've been doing option one for a long time and it was getting
    tedious. Option 2 is a real time saver. Thanks alot
     
    Albert Giuliano, Aug 8, 2003
    #5
  6. Albert Giuliano

    Paul Turvill Guest

    You're welcome.
    ___
     
    Paul Turvill, Aug 8, 2003
    #6
Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.