Free Pascal：控制台文本修改（初学者）

Question

我的问题很简单，我想知道是否可以使用 free pascal（没有 delphi 或其他任何东西）来“编辑”使用函数 write() 编写在控制台中的文本（或另一个做同样的事情） .

例如：

Program Test;
Begin
 Writeln('This is a test');
 FUNCTION('This test has been edited');
End.

输出：

This test has been edited

我知道我可以这样做：

Program Test;
Uses crt;
Begin
 Writeln('This is a test');
 ClrScr;
 Writeln('This test has been edited');
End.

但我不想使用 ClrScr。

感谢您的帮助。

Answer 1

试试GotoXY(X, Y)函数

 Writeln('This is a test');
 Readln;
 GotoXY(1, 1);
 Writeln('This test has been edited');
 Readln;