GETTEXTPOSITION

Graphics Subroutine: Returns the current text position.

Module: USE DFLIB

Syntax

CALL GETTEXTPOSITION (t)

t
(Output) Derived type rccord. Current text position.The derived type rccoord is defined in DFLIB.F90 (in the \DF98\INCLUDE subdirectory) as follows:

  TYPE rccoord
    INTEGER(2) row   ! Row coordinate
    INTEGER(2) col   ! Column coordinate
  END TYPE rccoord

The text position given by coordinates (1, 1) is defined as the upper-left corner of the text window. Text output from the OUTTEXT function (and WRITE and PRINT statements) begins at the current text position. Font text is not affected by the current text position. Graphics output, including OUTGTEXT output, begins at the current graphics output position, which is a separate position returned by GETCURRENTPOSITION.

Compatibility

STANDARD GRAPHICS QUICKWIN GRAPHICS LIB

See Also: SETTEXTPOSITION, GETCURRENTPOSITION, OUTTEXT, WRITE, SETTEXTWINDOW

Example

!  Build as QuickWin or Standard Graphics
     USE DFLIB
     TYPE (rccoord) textpos
     CALL GETTEXTPOSITION (textpos)
     END