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 2x4 = 90; y4 = 180status = ARC(x1, y1, x2, y2, x3, y3, x4, y4)status = GETARCINFO(xystart, xyend, xyfillpt)ENDGETBKCOLORGraphics Function: Returns the current background color index for both text and graphicsoutput. This function is only available on Windows* systems.Module: USE IFQWINSyntaxresult = GETBKCOLOR ( )Results:The result type is INTEGER(4). The result is the current background color index.GETBKCOLOR returns the current background color index for both text and graphics, as set withSETBKCOLOR. The color index of text over the background color is set with SETTEXTCOLORand returned with GETTEXTCOLOR. The color index of graphics over the background color isset with SETCOLOR and returned with GETCOLOR. These non-RGB color functions use colorindexes, not true color values, and limit the user to colors in the palette, at most 256. For access toall system colors, use SETBKCOLORRGB, SETCOLORRGB, and SETTEXTCOLORRGB.Generally, INTEGER(4) color arguments refer to color values and INTEGER(2) color argumentsrefer to color indexes. The two exceptions are GETBKCOLOR and SETBKCOLOR. The defaultbackground index is 0, which is associated with black unless the user remaps the palette withREMAPPALETTERGB.NOTE. The GETBKCOLOR routine described here is a QuickWin routine. Ifyou are trying to use the Microsoft* Platform SDK version of the GetBkColorroutine by including the IFWIN module, you need to specify the routine nameas MSFWIN$GetBkColor. For more information, see "Special NamingConvention for Certain QuickWin and Win32 Graphics Routines" in youruser’s guide.CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “GETBKCOLORRGB”, “SETBKCOLOR”, “GETCOLOR”, “GETTEXTCOLOR”,“REMAPALLPALETTERGB”, “REMAPPALETTERGB”2-99

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

Saved successfully!

Ooh no, something went wrong!