Code Red > AutoLISP (Vanilla / Visual)

Wish list

(1/1)

hmspe:
This has probably been done, but I'm not finding anything.  Running R2004 for production.  On my wish list for some time is having an editor for single line text that exits with no change it you press ESC and exits with the changes if you press ENTER.  No clicking of OK or Cancel buttons required.  Anyone know of  code that does this?  I'd also like to have something similar for attributes -- pressing Enter on the last line of a page of attributes would take you to the next page, or would exit if on the last line of the last page.  Thought I's ask if either of these has been done before trying to code them.

TIA
Martin

CAB:
Although Keith intended to edit attributes with this
http://www.theswamp.org/index.php?topic=10028.msg128438#msg128438
it can edit dText as well.

As for attributes, you can tweak this routine to your liking.
http://www.theswamp.org/index.php?topic=10216.0

sdp777:
In my opinion, this is still one of my most used functions.  A friend wrote it back in R14...and it still rocks all text items todate.  I can edit Dtext, Mtext, Dims and Attributes.  Many thanks to BSaw.


--- Code: ---(defun C:tt ()
  (setvar "CMDECHO" 0)
  (setq X (entget(car(setq E (entsel)))))
  (setq S (cadr E))
  (cond ((= (cdr (assoc 0 x)) "INSERT") (command "ddatte" S))
        ((command "ddedit" s ""))
  )
  (princ)
)
--- End code ---

hmspe:
Thanks.

Navigation

[0] Message Index