是否可以获取整个控制台并将其另存为字符串变量?

Question

我试图在程序结束时获取整个控制台文本并将其保存为字符串变量。然后之后我将获取字符串变量并将其另存为文本文档。解决这一障碍的最佳方法是什么？谢谢！

Answer 1

我认为这个解决方案可能有助于解决您的问题。

下面的 Qbasic 代码需要一个文本文件才能读取，它在屏幕上读取并打印文件的前九行，然后在控制台的后半部分复制前十行屏幕的内容，从屏幕内存中读取字符。

SCREEN 0
INPUT "File name: ", fname$
OPEN fname$ FOR INPUT AS #1
x = 9
WHILE NOT EOF(1) AND x <> 0
INPUT #1, x$
PRINT x$
x = x - 1
WEND
CLOSE #1
PRINT "----------------------------------"
REM HERE THE PROGRAM READS THE SCREEN
LOCATE 12, 1
FOR y = 1 TO 10
FOR x = 1 TO 80
PRINT CHR$(SCREEN(y, x, 0));
NEXT x
NEXT y