[Помогите!] динамическая строка

[lolwut98]

даже не знаю, как это правильно назвать, но мне нужно, чтобы можно было как-то поменять строку, которую я вывел через writeln. например, вот этот код:

for i:= 0 to 100 do
какая-то_процедура[номер_строки]:='I = '+inttostr(i);

будет обновлять какую-либо строку в консоли. надеюсь, что понятно объяснил) буду благодарен за помощь

[R-A-Z-O-R]

[Ссылки могут видеть только зарегистрированные пользователи. ], или можно хранить весь текст в одной строке, с помощью парсинга изменять ее, очищать консоль и выводить текст заново

[lolwut98]

большое спасибо

вот код, если кому надо:

uses
  SysUtils,
  Classes,
  Windows;

var
  i: integer;

procedure GotoXY(X, Y: smallint);
var
  ps: _COORD;
begin
  ps.X := X;
  ps.Y := Y;
  SetConsoleCursorPosition(GetStdHandle(STD_OUTPUT_HANDLE), ps);
end;

begin

  for i := 0 to 100 do
  begin
    GotoXY(0, 0);
    write(inttostr(i));
    sleep(100);
  end;

end.