[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Window System Choice Facilities Question
Date: Fri, 4 Jan 91 18:27:44 EST
From: djs@stdb.jhuapl.edu (David J. Scheerer)
Does anyone know if it is possible to have a tv:choose-variable-values-window
be a command-menu (permanent) rather than a pop-up menu or a momentary menu?
If not, are there any ideas for ways to acheive the same behavior, namely,
have a menu with choose-variable-values functionality that is always exposed
and activated?
Thanks in advance, Dave
--------------------------------------------------------------------
David J. Scheerer [djs@stdb.jhuapl.edu] (301) 792-5000 x3144, 3440
JHU/Applied Physics Lab 7-111 Johns Hopkins Rd. Laurel, MD 20723
If you're working with a DW Program Framework, the way to do it is
the :ACCEPT-VALUES-FUNCTION keyword on an :ACCEPT-VALUES pane.
1Excerpt:
0(DW:DEFINE-PROGRAM-FRAMEWORK ScatterPlot
...
:STATE-VARIABLES ((Left-Margin 75.0)
...
(Unit NIL)
...)
:PANES
(...
(ACCEPT-VALUES :ACCEPT-VALUES
:ACCEPT-VALUES-FUNCTION 'Accept-ScatterPlot-Variables
:SIZE-FROM-OUTPUT T
:REDISPLAY-AFTER-COMMANDS T)
...))
(defmethod 2(Accept-ScatterPlot-Variables ScatterPlot)0 (Stream)
(setf Unit (accept 'Unit
:prompt "Unit"
:default Unit
:stream Stream))
(format Stream "~%")
(setf Left-Margin
(accept 'number
:prompt "Left Margin"
:default Left-Margin
:stream Stream
:query-identifier 1))
...)