For a more complete description of this Motif widget, consult "OSF/Motif Programmer's Reference."
@ resource selects resource for a subsequent set or query.
: value sets the current resource to value. Since most resources have mixed case, you should enclose any resource name in quotes. Resource names are the Motif names with the XmN prefix removed. Some resources can only be set before the widget is created. For efficiency, set as many resources as you can before creation.
scalar_value? returns the value of the current resource whose type is integer.
string_value? returns the value of the current resource whose type is string.
pointer_value? returns the value of the current resource whose type is a pointer of any kind.
create! creates an instance of the widget. Any resources that have been specified prior to the create! will be set. An id? message also sends a create!.
on! realizes the widget. Realizing a widget creates its windows and displays it when it is managed.
apply_button_id? returns the id of the apply button widget.
cancel_button_id? returns the id of the cancel button widget.
default_button_id? returns the id of the default button widget.
help_button_id? returns the id of the help button widget.
list_id? returns the id of the list widget.
list_label_id? returns the id of the list label widget.
ok_button_id? returns the id of the ok button widget.
selection_label_id? returns the id of the selection label widget.
separator_id? returns the id of the separator button widget.
text_id? returns the id of the text widget.
work_area_id? returns the id of the work_area widget.
<motifinit <colors
motif application="Selection Dialog Example"; motif_push_button new: button parent=motif @ "labelString" : "Push me for a Selection Dialog" activate_action=popup_dialog create! ; actions new: popup_dialog tick_actions+ "aSelectionDialog on!;" ; motif_selection_dialog new: aSelectionDialog parent=motif ok_action=ok create!
; string new: _requested; actions new: ok tick_actions+ " _requested = [aSelectionDialog @ `textString' string_value?]; _requested + ` print!;'; parser parse: _requested; " ; motif_list new: dialog_list id=[aSelectionDialog list_id?] add_item: [object instances?] ; motif_text_field new: dialog_text id=[aSelectionDialog text_id?] ; motif on! start!;