Thema
:
Delphi
Text auf Konsole überschreiben
Einzelnen Beitrag anzeigen
Muetze1
(Gast)
n/a Beiträge
#
2
Re: Text auf Konsole überschreiben
30. Apr 2008, 16:32
Write
(Format(#13+'
%u percent complete.
', [iPercent]));
Vorher einmalig ausserhalb der Schleife WriteLn; um die Zeile zu erzeugen. Danach kannst du mit
WriteLn('
done.
');
die Ausgaben überdecken.
Zitat
30. Apr 2008, 16:32