Forum: Object-Pascal / Delphi-Language
by Gargoyl,
14. Aug 2011
War das zu viel Hilfestellung? :duck:
Forum: Object-Pascal / Delphi-Language
by Gargoyl,
14. Aug 2011
Du misst einfach die Zeit die dein Programm benötigt um eine kleine Anzahl von Wörtern benötigt, dann rechnest du die Zeit hoch auf die Gesamtzahl der Wörter die zusammen gesetzt werden sollen. Die Restzeit kannst du nach jedem Schleifendurchlauf aktualisieren. In etwa so:
Startzeit := GetTickCount();
Label.Caption := 'geschätzte Restzeit: unbekannt';
for i:=1 to GesAnzahl do
begin
...