実行時関数:バッファ入力を使ってキーボードから文字を読み取ります。
モジュール:USE DFLIB
形式
result = GETSTRQQ (buffer )
buffer
(入力) CHARACTER*(*)。空白が詰め込まれたキーボードから返される文字列。
結果
結果の型は INTEGER(4) です。結果は buffer に置かれた文字数です。
RETURN または ENTER キーを押すまで,この関数は完了しません。
互換性
CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB
関連情報
例
! 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