clim:accept, clim:accepting-values inititial cursor position

--Apple-Mail-1-782036297
Content-Transfer-Encoding: 7bit
Content-Type: text/plain;
	charset=US-ASCII;
	format=flowed

In calls to CLIM accepting values and CLIM:accept, for example

(clim:accepting-values
               (window  :label "Quit?"
                        :own-window T :x-position 40 :y-position 20
                        :exit-boxes '((:exit "OK")))
               (clim:stream-set-cursor-position window 0 10)
               (setf item-to-set
                     (clim:accept 'string :stream window :prompt " 
Quit?"))
               (fresh-line window) (terpri window))

MCL 5/CLIM 2 automatically places the cursor in the box within the 
clim:accept window.
Additionally, MCL allows you to simply hit return rather than click 
"ok" after
you put your response in the dialog box.
Can this be done in CLIM 2 for Lispworks as well?

Vei
--Apple-Mail-1-782036297
Content-Transfer-Encoding: 7bit
Content-Type: text/enriched;
	charset=US-ASCII

In calls to CLIM accepting values and CLIM:accept, for example


<fixed><x-tad-smaller>(clim:accepting-values

              (window  :label "Quit?"

                       :own-window T :x-position 40 :y-position 20

                       :exit-boxes '((:exit "OK")))

              (clim:stream-set-cursor-position window 0 10)

              (setf item-to-set

                    (clim:accept 'string :stream window :prompt "
Quit?"))

              (fresh-line window) (terpri window))


MCL 5/CLIM 2 automatically places the cursor in the box within the
clim:accept window.

Additionally, MCL allows you to simply hit return rather than click
"ok" after

you put your response in the dialog box.

Can this be done in CLIM 2 for Lispworks as well?


Vei</x-tad-smaller></fixed>
--Apple-Mail-1-782036297--

--
[To unsubscribe to this list send an email to "[email protected]"
with the following text in the BODY of the message "unsubscribe clim"]