免费Pascal:控制台文本修改(初学者)

时间:2014-01-08 20:20:21

标签: dynamic text console edit freepascal

我的问题很简单,我想知道是否有可能使用免费的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。

感谢您的帮助。

1 个答案:

答案 0 :(得分:1)

尝试GotoXY(X, Y)功能

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