Graphics Function: Returns the status of the most recently used graphics routine.
Module: USE DFLIB
Syntax
Results:
The result is of type INTEGER(2). The result is the status of the most recently used graphics function.
Use GRSTATUS immediately following a call to a graphics routine to determine if errors or warnings were generated. Return values less than 0 are errors, and values greater than 0 are warnings.
The following symbolic constants are defined in the DFLIB.F90 module file (in the \DF98\INCLUDE subdirectory) for use with GRSTATUS:
Constant | Meaning |
---|---|
$GRFILEWRITEERROR | Error writing bitmap file |
$GRFILEOPENERROR | Error opening bitmap file |
$GRIMAGEREADERROR | Error reading image |
$GRBITMAPDISPLAYERROR | Error displaying bitmap |
$GRBITMAPTOOLARGE | Bitmap too large |
$GRIMPROPERBITMAPFORMAT | Improper format for bitmap file |
$GRFILEREADERROR | Error reading file |
$GRNOBITMAPFILE | No bitmap file |
$GRINVALIDIMAGEBUFFER | Image buffer data inconsistent |
$GRINSUFFICIENTMEMORY | Not enough memory to allocate buffer or to complete a fill operation |
$GRINVALIDPARAMETER | One or more parameters invalid |
$GRMODENOTSUPPORTED | Requested video mode not supported |
$GRERROR | Graphics error |
$GROK | Success |
$GRNOOUTPUT | No action taken |
$GRCLIPPED | Output was clipped to viewport |
$GRPARAMETERALTERED | One or more input parameters was altered to be within range, or pairs of parameters were interchanged to be in the proper order |
After a graphics call, compare the return value of GRSTATUS to $GROK. to determine if an error has occurred. For example:
IF ( GRSTATUS .LT. $GROK ) THEN
! Code to handle graphics error goes here
ENDIF
The following routines cannot give errors, and they all set GRSTATUS to $GROK:
DISPLAYCURSOR | GETTEXTCOLORRGB |
GETBKCOLOR | GETTEXTPOSITION |
GETBKCOLORRGB | GETTEXTWINDOW |
GETCOLOR | OUTTEXT |
GETCOLORRGB | WRAPON |
GETTEXTCOLOR |
The following table lists other routines with the error or warning messages they produce for GRSTATUS:
Function | Possible GRSTATUS error codes | Possible GRSTATUS warning codes |
---|---|---|
ARC,
ARC_W |
$GRINVALIDPARAMETER | $GRNOOUTPUT |
CLEARSCREEN | $GRINVALIDPARAMETER | |
ELLIPSE,
ELLIPSE_W |
$GRINVALIDPARAMETER,
$GRINSUFFICIENTMEMORY |
$GRNOOUTPUT |
FLOODFILLRGB | $GRINVALIDPARAMETER,
$GRINSUFFICIENTMEMORY |
$GRNOOUTPUT |
GETARCINFO | $GRERROR
|
|
GETFILLMASK | $GRERROR,
$GRINVALIDPARAMETER |
|
GETFONTINFO | $GRERROR | |
GETGTEXTEXTENT | $GRERROR | |
GETIMAGE | $GRINSUFFICIENTMEMORY | $GRPARAMETERALTERED |
GETPIXEL | $GRBITMAPTOOLARGE | |
GETPIXELRGB | $GRBITMAPTOOLARGE | |
LINETO,
LINETO_W |
$GRNOOUTPUT,
$GRCLIPPED |
|
LOADIMAGE | $GRFILEOPENERROR,
$GRNOBITMAPFILE, $GRALEREADERROR, $GRIMPROPERBITMAPFORMAT, $GRBITMAPTOOLARGE, $GRIMAGEREADERROR |
|
OUTGTEXT | $GRNOOUTPUT,
$GRCLIPPED |
|
PIE,
PIE_W |
$GRINVALIDPARAMETER,
$GRINSUFFICIENTMEMORY |
$GRNOOUTPUT |
POLYGON,
POLYGON_W |
$GRINVALIDPARAMETER,
$GRINSUFFICIENTMEMORY |
$GRNOOUTPUT,
$GRCLIPPED |
PUTIMAGE,
PUTIMAGE_W |
$GRERROR,
$GRINVALIDPARAMETER, $GRINVALIDIMAGEBUFFER $GRBITMAPDISPLAYERROR |
$GRPARAMETERALTERED,
$GRNOOUTPUT |
RECTANGLE,
RECTANGLE_W |
$GRINVALIDPARAMETER,
$GRINSUFFICIENTMEMORY |
$GRNOOUTPUT,
$GRCLIPPED |
REMAPPALETTERGB | $GRERROR,
$GRINVALIDPARAMETER |
|
REMAPALLPALETTERGB | $GRERROR,
$GRINVALIDPARAMETER |
|
SAVEIMAGE | $GRFILEOPENERROR | |
SCROLLTEXTWINDOW | $GRNOOUTPUT | |
SETBKCOLOR | $GRINVALIDPARAMETER | $GRPARAMETERALTERED |
SETBKCOLORRGB | $GRINVALIDPARAMETER | $GRPARAMETERALTERED |
SETCLIPRGN | $GRPARAMETERALTERED | |
SETCOLOR | $GRPARAMETERALTERED | |
SETCOLORRGB | $GRPARAMETERALTERED | |
SETFONT | $GRERROR,
$GRINSUFFICIENTMEMORY |
$GRPARAMETERALTERED |
SETPIXEL,
SETPIXEL_W |
$GRNOOUTPUT | |
SETPIXELRGB,
SETPIXELRGB_W |
$GRNOOUTPUT | |
SETTEXTCOLOR | $GRPARAMETERALTERED | |
SETTEXTCOLORRGB | $GRPARAMETERALTERED | |
SETTEXTPOSITION | $GRPARAMETERALTERED | |
SETTEXTWINDOW | $GRPARAMETERALTERED | |
SETVIEWPORT | $GRPARAMETERALTERED | |
SETWINDOW | $GRINVALIDPARAMETER | $GRPARAMETERALTERED |
SETWRITEMODE | $GRINVALIDPARAMETER |
Compatibility
STANDARD GRAPHICS QUICKWIN GRAPHICS LIB
See Also: ARC, ELLIPSE, FLOODFILLRGB, LINETO, PIE, POLYGON, REMAPALLPALETTERGB, SETBKCOLORRGB, SETCOLORRGB, SETPIXELRGB, SETTEXTCOLORRGB, SETWINDOW, SETWRITEMODE