Author Topic: Wish list  (Read 1911 times)

0 Members and 1 Guest are viewing this topic.

hmspe

  • Bull Frog
  • Posts: 362
Wish list
« on: July 03, 2006, 11:12:43 AM »
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
"Science is the belief in the ignorance of experts." - Richard Feynman

CAB

  • Global Moderator
  • Seagull
  • Posts: 10401
Re: Wish list
« Reply #1 on: July 03, 2006, 12:29:22 PM »
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
I've reached the age where the happy hour is a nap. (°¿°)
Windows 10 core i7 4790k 4Ghz 32GB GTX 970
Please support this web site.

sdp777

  • Guest
Re: Wish list
« Reply #2 on: July 03, 2006, 10:37:44 PM »
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: [Select]
(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)
)

hmspe

  • Bull Frog
  • Posts: 362
Re: Wish list
« Reply #3 on: July 06, 2006, 02:25:17 PM »
Thanks.
"Science is the belief in the ignorance of experts." - Richard Feynman