The following sets of routines are available:
Creating and Handling a Pop-up Dialogue Box View-Object
The following routines are available:
Display a pop-up dialog box - xdl_popup_dialog
Fortran call:
CALL XDLF_POPUP_DIALOG (IXROOT, IYROOT, PROMPT, LENP,
+ IWIDTH,
+ REPLY, LENR,
+ IFONT, IARROW, IRETURN)
Parameters:
IXROOT (R) X (rootwindow) position for dialog (top left)
(see xroot)
IYROOT (R) Y (rootwindow) position for dialog (top left)
(see yroot)
PROMPT (R) Address of character string containing the prompt.
** Pass address using the XDLSTR function **
(see prompt)
LENP (R) Length of the PROMPT character string (>0)
(cf lenp)
IWIDTH (R) Width of box as the number of characters in
the prompt string + the number to be displayed
in the reply string (note: the reply string can
be scrolled using the cursor left and right keys)
(see width)
REPLY (W) Address of character string to contain the reply
message.
** Pass address using the XDLSTR function **
(see reply)
MAXLEN (R) Maximum length for the returned reply string (>0).
(cf max_len)
IFONT (R) Font type (1 to 5, very small to extra large)
(see font_type)
IBOLD (R) =0 Prompt and input string in normal text
=1 Prompt bold, input string normal
=2 Prompt normal, input string bold
=3 Both strings bold
(see bold)
IARROW (R) =1 display an arrow pointing to the top left corner
of the dialog box provided that it can be placed
in the requested position, =0 do not. (see arrow)
IRETURN (W) Return flag = 0 Blank string
= 1 String returned (non-blank)
=-1 Input aborted (via Escape key)
=-2 Unable to allocate memory for
temporary input string
=-3 No room for an input string
'C' call:
int xdl_popup_dialog (xroot, yroot, prompt, lenp, width, reply, max_len,
font_type, bold, arrow)
Parameters:
int xroot; /* x position of the dialog popup area
(wrt root) (R)*/
int yroot; /* y position of the dialog popup area
(wrt root) (R)*/
char * prompt; /* Prompt string (R)*/
int lenp; /* Length of prompt string. If 0 then the routine will
find the length assuming a null terminated
string (R)*/
int width; /* Width of box as the number of characters in
the prompt string + the number to be displayed
in the reply string (note: the reply string can
be scrolled using the cursor left and right keys)
(R)*/
char * reply; /* Address for returned string (W)*/
int max_len; /* if >0 Maximum length of return string allowed
(excluding terminating null - reply must be
at least max_len+1 characters in length)
if <0 abs(max_len) characters will be returned
padded with blanks if needed (for 'fortran'
use) (R)*/
int font_type; /* Font type 1 to 5, very-small to extra-large (R)*/
int bold; /* =0 Prompt and input string in normal text
=1 Prompt bold, input string normal
=2 Prompt normal, input string bold
=3 Both strings bold (R)*/
int arrow; /* =1 draw arrow pointing to origin (provided that
dialog may be positioned where requested), =0 do
not (R)*/
Return: = 0, Blank reply
= 1, Text string was input
=-1, Input aborted
=-2, Unable to allocate memory for temporary input string
=-3, No room for an input string