Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference

ID 767251
Date 3/22/2024
Public
Document Table of Contents

SETTEXTWINDOW

Graphics Subroutine: Sets the current text window. This routine is only available for Windows.

Module

USE IFQWIN

CALL SETTEXTWINDOW (r1,c1,r2,c2)

r1, c1

(Input) INTEGER(2). Row and column coordinates for upper-left corner of the text window.

r2, c2

(Input) INTEGER(2). Row and column coordinates for lower-right corner of the text window.

SETTEXTWINDOW specifies a window in row and column coordinates where text output to the screen using OUTTEXT, WRITE, or PRINT will be displayed. You set the text location within this window with SETTEXTPOSITION.

Text is output from the top of the window down. When the window is full, successive lines overwrite the last line.

SETTEXTWINDOW does not affect the output of the graphics text routine OUTGTEXT. Use the SETVIEWPORT function to control the display area for graphics output.

Example

 USE IFQWIN
 TYPE (rccoord) curpos

 CALL SETTEXTWINDOW(INT2(5), INT2(1), INT2(7), &
                    INT2(40))
 CALL SETTEXTPOSITION (INT2(5), INT2(5), curpos)
 WRITE(*,*) "Only two lines in this text window"
 WRITE(*,*) "so this line will be overwritten"
 WRITE(*,*) "by this line"
 END