The following sets of routines are available:
Creating and Handling an I/O Window View-Object
The following routines are available:
Create an I/O window view-object - xdl_io_window
Output a text string - xdl_io_window_print
Get an input text string - xdl_io_window_getstring
Reset active strip message - xdl_io_window_input_message
Set keyboard focus - xdl_io_window_set_focus
Get a root window position - xdl_io_window_rootxy
Calculate size requirements - xdl_io_window_getsize
Fortran call:
CALL XDLF_IO_WINDOW (IVH, IVHPARENT, IX, IY, ICSET, NCOLS,
+ NROWS, MINW, MINH, IFONT, NSCROLL, IERR)
Parameters:
IVH (R) View-object handle (see vh)
IVHPARENT (R) View-object handle for parent 0=none
(see vh_parent)
IX (R) X position (may be -1 if no parent) (see x)
IY (R) Y position (may be -1 if no parent) (see y)
ICSET (R) Colorset number (see cset)
NCOLS (R) No. of cols of characters or 0 (see ncols)
NROWS (R) No. of rows of characters or 0 (see nrows)
MINW (R) Minimum width in pixels (see min_width)
MINH (R) Minimum height in pixels (see min_height)
IFONT (R) Font type (1->5 very-small->extra-large)
(see font_type)
NSCROLL (R) The number of pages (of nrows lines) to be
saved for scrolling option (0 if no scrolling)
IERR (W) Returns status from xdl_io_window call
'C' call:
int xdl_io_window (vh, vh_parent, x, y, cset, ncols, nrows, min_width,
min_height, font_type, nscroll)
Parameters:
int vh; /* User selected view-object handle (R)*/
int vh_parent; /* View-object handle for the parent base frame,
if 0 then a base level frame is created to
enclose the i/o window view-object (R)*/
int x; /* x coordinate for the view-object.
If no parent may be -1 to give default x (R)*/
int y; /* y coordinate for the view-object.
If no parent may be -1 to give default y (R)*/
int cset; /* Number of the colorset to be used -
normally 0 (R)*/
int ncols; /* Number of columns of characters (if 0 then
this will be calculated from min_width which
must then be given a value > 0. (R)*/
int nrows; /* Number of rows of characters (if 0 then
this will be calculated from min_height which
must then be given a value > 0. (R)*/
int min_width; /* Minimum window width in pixels. If this is
greater than the width calculated from the
number of character columns requirement then
this value will be used as the window width
(R)*/
int min_height; /* Minimum window height in pixels. If this is
greater than the height calculated from the
number of character rows requirement then
this value will be used as the window height
(R)*/
int font_type; /* Font type (1-5) for very_small, small, medium,
large or extra-large font. (R)*/
int nscroll; /* No. of pages which may be back scrolled;
0 if no scrolling */
Return: Status flag =0 OK, >0 error
bit 0 set: Requested parent not found in view-objects list
bit 1 set: Memory allocation error
Fortran call:
CALL XDLF_IO_WINDOW_PRINT (IVH, XDLSTR(STRING), LEN, NEWLIN,
+ IERR)
Parameters:
IVH (R) View-object handle (see vh)
STRING (R) The string to be printed (see string)
** Pass the address using the XDLSTR function **
LEN (R) Length of the string (>0) (cf len_str)
NEWLIN (R) =0 no newlines, =1 newline before printing the
string,
=2 newline after printing the string, =3 newlines
before and after printing the string
IERR (W) Returns the status from xdl_io_window_print call
'C' call: int xdl_io_window_print (vh, string, len_str)
Parameters:
int vh; /* The xdl_io_window view-object handle (R)*/
char string[]; /* The string to be printed
Note: \f, \r and \v will all be treated as \n
(newline)
\b is ignored
\t (tab) is converted to a space
(R)*/
int len_str; /* The length of the string. If the string is null
terminated, then 0 may be given and the length
of the string will then be determined by the
routine (R)*/
Return: Status = 0 OK, >0 error
bit 0 set: View-object handle not found
bit 1 set: View handle does not match view object
Fortran call:
CALL XDLF_IO_WINDOW_GETSTRING (IVH, XDLSTR(STRING), MAXLEN,
+ IERR)
Parameters:
IVH (R) View-object handle (see vh)
STRING (W) Returned string (see string)
** Pass address using the XDLSTR function **
MAXLEN (R) Maximum allowed length for the returned string
( > 0) (cf max_len)
IERR (W) Returns status from xdl_io_window_getstring call
'C' call: int xdl_io_window_getstring (vh, string, max_len)
Parameters:
int vh; /* View-object handle (R)*/
char string[]; /* Returned string (W)*/
int max_len; /* if >0 Maximum length of returned string allowed
(excluding terminating null - string 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)*/
Return: Status = 0 OK, >0 error
bit 0 set: View-object handle not found
bit 1 set: View handle does not match view object
Fortran call:
CALL XDLF_IO_WINDOW_INPUT_MESSAGE (IVH, XDLSTR(MESSAGE),
+ LEN, IERR)
Parameters:
IVH (R) View-object handle (see vh)
MESSAGE (R) Character string containing the message
(see message)
** Pass address using the XDLSTR function **
LEN (R) Length of the message string - must be >0
(cf len) (max 60 chars)
IERR (W) Returns status from xdl_io_window_input_message
call
'C' call: int xdl_io_window_input_message (vh, message, len)
Parameters:
int vh; /* View-object handle (R)*/
char *message; /* Message string (max of 60 chars long) (R)*/
int len; /* Length of the message string; if 0 then length
will be found assuming a null terminated string
(R)*/
Return: Status = 0 OK, >0 error
bit 0 set: View-object handle not found
bit 1 set: View handle does not match view object
Fortran call:
CALL XDLF_IO_WINDOW_SET_FOCUS (IVH, MSEC, NTRY, IERR)
Parameters:
IVH (R) View-object handle (see vh)
MSEC (R) If window not currently visable, retry after 'MSEC'
milliseconds
NTRY (R) Maximum no. of retries to attempt.
IERR (W) Returns status from xdl_io_window_set_focus call
'C' call: int xdl_io_window_set_focus (vh, msec, ntry)
Parameters:
int vh; /* View-object handle (R)*/
int msec; /* If window not currently visable, retry after
'msec' milliseconds (R)*/
int ntry; /* Maximum no. of retries to attempt (R)*/
Return: Status = 0 OK, >0 error
bit 0 set: View-object handle not found
bit 1 set: View handle does not match view object
Fortran call:
CALL XDLF_IO_WINDOW_ROOTXY (IVH, IXROOT, IYROOT, IERR)
Parameters: IVH (R) View-object handle (see vh) IXROOT (W) Returns the required x root position (see xroot) IYROOT (W) Returns the required y root position (see yroot) IERR (W) Returns status from xdl_io_window_rootxy call
'C' call: int xdl_io_window_rootxy (vh, xroot, yroot)
Parameters:
int vh; /* View-object handle (R)*/
int *xroot; /* Returns the required xroot position e.g for use with
an error notice after the input of an incorrect string
(W)*/
int *yroot; /* Returns the required yroot position (W)*/
Return: Status = 0 OK, >0 error
bit 0 set: View-object handle not found
bit 1 set: View handle does not match view object
Fortran call:
CALL XDLF_IO_WINDOW_GETSIZE (NCOLS, NROWS, IFONT, NSCROLL, IWIDTH,
+ IHEIGHT)
Parameters:
NCOLS (R) No. of cols of characters or 0 (see ncols)
NROWS (R) No. of rows of characters or 0 (see nrows)
IFONT (R) Font type (1->5 very-small->extra-large)
(see font_type)
NSCROLL (R) No. of scrolling pages or 0 if no scrolling;
(any value >0 has the same effect)
IWIDTH (W) Returns the width required (see w)
IHEIGHT (W) Returns the height required (see h)
'C' call: void xdl_io_window_getsize (ncols, nrows, font_type, nscroll, w, h)
Parameters:
int ncols; /* Number of columns of characters ( > 0 ) (R)*/
int nrows; /* Number of rows of characters ( > 0 ) (R)*/
int font_type; /* Font type (1-5) for very-small, small, medium,
large or extra-large font. (R)*/
int nscroll; /* No. of scrolling pages to save */
int *w; /* Returns the width required (W)*/
int *h; /* Returns the height required (W)*/
Return: None
