12.07.2015 Views

Intel® Fortran Libraries Reference

Intel® Fortran Libraries Reference

Intel® Fortran Libraries Reference

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

2 Intel <strong>Fortran</strong> <strong>Libraries</strong> <strong>Reference</strong>SETTEXTCOLORRGB (and the other RGB color selection functions SETBKCOLORRGB andSETCOLORRGB) sets the color to a value chosen from the entire available range. The non-RGBcolor functions (SETTEXTCOLOR, SETBKCOLOR, and SETCOLOR) use color indexes ratherthan true color values.If you use color indexes, you are restricted to the colors available in the palette, at most 256. Somedisplay adapters (SVGA and true color) are capable of creating 262,144 (256K) colors or more. Toaccess any available color, you need to specify an explicit RGB value with an RGB color function,rather than a palette index with a non-RGB color function.CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “SETBKCOLORRGB”, “SETCOLORRGB”, “GETTEXTCOLORRGB”,“GETWINDOWCONFIG”, “OUTTEXT”Example! Build as a Graphics ap.USE IFQWININTEGER(4) oldtcoldtc = SETTEXTCOLORRGB(Z'000000FF')WRITE(*,*) 'I am red'oldtc = SETTEXTCOLORRGB(Z'0000FF00')CALL OUTTEXT ('I am green'//CHAR(13)//CHAR(10))oldtc = SETTEXTCOLORRGB(Z'00FF0000')PRINT *, 'I am blue'ENDSETTEXTCURSORGraphics Function: Sets the height and width of the text cursor (the caret) for the window infocus. This function is only available on Windows* systems.Module: USE IFQWINSyntaxresult = SETTEXTCURSOR (newcursor)newcursor(Input) INTEGER(2). The leftmost 8 bits specify the width of the cursor, and the rightmost 8 bitsspecify the height of the cursor. These dimensions can range from 1 to 8, and represent a fractionof the current character cell size. For example:• Z'0808' – Specifies the full character cell; this is the default size.2-424

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

Saved successfully!

Ooh no, something went wrong!