12.07.2015 Views

Intel® Fortran Libraries Reference

Intel® Fortran Libraries Reference

Intel® Fortran Libraries Reference

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

Descriptions of the Library Routines 2GETIMAGE, GETIMAGE_WGraphics Subroutines: Store the screen image defined by a specified bounding rectangle. Thesesubroutines are only available on Windows* systems.Module: USE IFQWINSyntaxCALL GETIMAGE (x1, y1, x2, y2, image)CALL GETIMAGE_W (wx1, wy1, wx2, wy2, image)x1, y1(Input) INTEGER(2). Viewport coordinates for upper-left corner of bounding rectangle.x2, y2(Input) INTEGER(2). Viewport coordinates for lower-right corner of bounding rectangle.wx1, wy1(Input) REAL(8). Window coordinates for upper-left corner of bounding rectangle.wx2, wy2(Input) REAL(8). Window coordinates for lower-right corner of bounding rectangle.image(Output) INTEGER(1). Array of single-byte integers. Stored image buffer.GETIMAGE defines the bounding rectangle in viewport-coordinate points (x1, y1) and (x2, y2).GETIMAGE_W defines the bounding rectangle in window-coordinate points (wx1, wy1) and(wx2, wy2).The buffer used to store the image must be large enough to hold it. You can determine the imagesize by calling IMAGESIZE at run time, or by using the formula described under IMAGESIZE.After you have determined the image size, you can dimension the buffer accordingly.CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “IMAGESIZE, IMAGESIZE_W”, “PUTIMAGE, PUTIMAGE_W”Example! Build as QuickWin or Standard GraphicsUSE IFQWININTEGER(1), ALLOCATABLE:: buffer (:)INTEGER(2) status, x, y, errorINTEGER(4) imsizex = 502-129

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!