Intel® Fortran Libraries Reference

2 Intel Fortran Libraries Referenceoldcolor = SETBKCOLORRGB(Z'00FFFF')CALL CLEARSCREEN ($GCLEARSCREEN)oldcolor = SETCOLORRGB(Z'FF00FF')CALL MOVETO(INT2(0), INT2(0), xy)result = LINETO(INT2(200), INT2(200)) ! purpleoldmode = SETWRITEMODE( $GAND)CALL MOVETO(INT2(50), INT2(0), xy)result = LINETO(INT2(250), INT2(200)) ! redENDSETWSIZEQQQuickWin Function: Sets the size and position of a window. This function is only available onWindows* systems.Module: USE IFQWINSyntaxresult = SETWSIZEQQ (unit, winfo)unit(Input) INTEGER(4). Specifies the window unit. Unit numbers 0, 5, and 6 refer to the defaultstartup window only if the program does not explicitly open them with the OPEN statement. To setthe size of the frame window (as opposed to a child window), set unit to the symbolic constantQWIN$FRAMEWINDOW (defined in IFQWIN.F90).When called from INITIALSETTINGS, SETWSIZEQQ behaves slightly differently than whencalled from a user routine after initialization. See below under Results.winfo(Input) Derived type qwinfo. Physical coordinates of the window's upper-left corner, and thecurrent or maximum height and width of the window’s client area (the area within the frame). Thederived type qwinfo is defined in IFQWIN.F90 as follows:TYPE QWINFOINTEGER(2) TYPE ! request typeINTEGER(2) X ! x coordinate for upper leftINTEGER(2) Y ! y coordinate for upper leftINTEGER(2) H ! window heightINTEGER(2) W ! window widthEND TYPE QWINFO2-438