Re: editing text in a pop-up window

• To: colin@franz.com, Naha@reagan.ai.mit.edu
• Subject: Re: editing text in a pop-up window
• From: Scott McKay <swm@lyra.mystech.com>
• Date: Fri, 14 Jan 1994 15:00-0500
• Cc: clim@BBN.COM, Benjamin@ai.mit.edu
• In-Reply-To: <9401141934.AA00178@vapor.Franz.COM>

    Date: Fri, 14 Jan 1994 14:34 EST
    From: Colin Meldrum <colin@franz.com>


    In CLIM 2.0, the following should work:

    (defun edit-text (stream text)
      (accepting-values (stream :own-window t)
	(setq text (accept 'string
			   :stream stream
			   :view '(text-editor-view
				   :nlines 20 :ncolumns 40)
			   :default text)))
      text)

    Just call edit-text with a CLIM stream and the initial text

I would like this solution better than the one I offered except that
you need to click on the text field in order to start editing it, and
you also have to hit <End> twice.  Sigh.

You might think that :INITIALLY-SELECT-QUERY-ID would fix the first
little problem, except that that appears not always to work in some
gadget dialogs.  Sigh again.

• Re: editing text in a pop-up window
• From: Benjamin Renaud <benjamin@reagan.ai.mit.edu>
• Re: editing text in a pop-up window
• From: Benjamin Renaud <benjamin@reagan.ai.mit.edu>

• Re: editing text in a pop-up window
• From: Colin Meldrum <colin@franz.com>

• Prev: Re: editing text in a pop-up window
• Next: Re: editing text in a pop-up window
• Index: CLIM Mailing list (1-Jun-94 to 30-Jun-95)
• Thread: CLIM Mailing list Index (1-Jun-94 to 30-Jun-95)