インテル® Fortran コンパイラー 19.0 デベロッパー・ガイドおよびリファレンス

GRSTATUS (W*S)

Graphics Function: Returns the status of the most recently used graphics routine.

Module

USE IFQWIN

result = GRSTATUS( )

Results

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

 

See Also