GETSTRQQ

実行時関数:バッファ入力を使ってキーボードから文字を読み取ります。

モジュールUSE DFLIB

形式

result = GETSTRQQ (buffer )

buffer
(入力) CHARACTER*(*)。空白が詰め込まれたキーボードから返される文字列。

結果

結果の型は INTEGER(4) です。結果は buffer に置かれた文字数です。

RETURN または ENTER キーを押すまで,この関数は完了しません。

互換性

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

関連情報

GETCHARQQPEEKCHARQQREAD

	! GETSTRQQ の例
	USE DFLIB
	INTEGER(4) length, result
	CHARACTER(80) prog, args
	WRITE (*, '(A, \)') ' Enter program to run: '
	length = GETSTRQQ (prog)
	WRITE (*, '(A, \)') ' Enter arguments: '
	length = GETSTRQQ (args)
	result = RUNQQ (prog, args)
	IF (result .EQ. -1) THEN
	  WRITE (*,*) 'Couldn''t run program'
	ELSE
	  WRITE (*, '(A, Z4, A)') 'Return code : ', result, 'h'
	END IF
	END