Registriert seit: 14. Apr 2004
Ort: Leipzig
125 Beiträge
Delphi 6 Enterprise
|
Re: Timeout für Prozeduren/Funktionen
23. Aug 2005, 12:30
Um den Thread nicht zu beenden, könnte man eigentlich auch über Suspend arbeiten.
Also im Timerereignis den Thread auf Suspend setzen, die Variable auslesen, mit der Berechnungszahl und dann den Durchschnittswert pro Sekunde berechnen. Die Variable dann auf 0 setzen und den Thread Resumen.
Und im Thread inkrementierst du die Variable halt ganz normal pro Rekursion.
|