CLIM mail archive


Re: editing text in a pop-up window

    Date: Fri, 14 Jan 1994 14:34 EST
    From: Colin Meldrum <>

    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)))

    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.

Follow-Ups: References:

Main Index | Thread Index