BOXINP |
Boxinp is used to enter a selection in a previously declared dialogue box.
Boxinp class Using variable
|
Element |
Description |
Restrictions |
|
class |
Indicates the abbreviation for a dialogue box. |
The class must exist |
|
variable |
numerical variable_name returning the number of the selected button |
The variable must exist. |
# entry in a window :
# variable recovering selected
button
Local Integer RESU
# definition of input box
# with mask opened
Local Inpbox Mask ZMOTSA00 [ZM00]
& Button "END"
& With "E"
& Coded 1901
& Titled "Box title"
& As [BOI1]
$MENU
# display of window
Boxact [BOI1]
# entry in window :
Boxinp [BOI1] using RESU
# action according to button
activated
Case RESU
when 1901 Goto FIN
when Default Goto FIN
Endcase
Goto MENU
# closing box and mask
Close Local Inpbox [BOI1]
Close Local Mask [ZM00]
Boxinp is used for input to an Inpbox, Dlgbox, or Mesbox dialogue box.
These OBJects must already have been declared, with an identifying abbreviation so that they can then be displayed.
Boxinp indicates which button has been activated. The status of the button activated is actually assigned to the variable given in the Using class.
|
Error |
Description |
|
ERVARI ( 6) |
Non-existent variable. |
|
ERMODE (10) |
The variable is not numerical. |
|
ERCLAS ( 7) |
The class given is [X:abv] rather than [abv]. |
|
NOFEN (36) |
Non-existent window. |
Inpbox - Dlgbox - Mesbox - Boxact - Boxclr -
|
|