GETTEXTPOSITION

グラフィックス・サブルーチン：現在のテキスト位置を返します。

モジュール：USE DFLIB

形式

CALL GETTEXTPOSITION (t)

t
(出力) 構造型 rccord。現在のテキスト位置。rccoord 構造型 (\DF98\INCLUDE サブディレクトリの DFLIB.F90 に定義) は，以下のようになります。

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

座標 (1, 1) で与えられるテキスト位置は，テキスト・ウィンドウの左上隅として定義されています。OUTTEXT 関数 (および WRITE と PRINT 文) からのテキスト出力は，現在のテキスト位置から開始されます。フォント・テキストは，現在のテキスト位置に影響されません。OUTGTEXT 出力を含むグラフィックス出力は，現在のグラフィックス出力位置から開始されます。これは，GETCURRENTPOSITION で返される別の位置です。

互換性

STANDARD GRAPHICS QUICKWIN GRAPHICS LIB

関連情報

GETCURRENTPOSITION，OUTTEXT，SETTEXTPOSITION，SETTEXTWINDOW，WRITE

例

	! QuickWin または Standard Graphics アプリケーションでビルドします。
	USE DFLIB
	TYPE (rccoord) textpos
	CALL GETTEXTPOSITION (textpos)
	END