Intel® Fortran Compiler 17.0 Developer Guide and Reference
Graphics Function: Returns the status of the most recently used graphics routine.
USE IFQWIN
result = GRSTATUS( )
The result type is 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 IFQWIN.F90 module file 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 |
GETCOLORRGB |
GETTEXTWINDOW |
GETBKCOLOR |
GETTEXTCOLOR |
OUTTEXT |
GETBKCOLORRGB |
GETTEXTCOLORRGB |
WRAPON |
GETCOLOR |
GETTEXTPOSITION |
The following table lists some 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 |
|
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 |