Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.762 Beiträge
 
Delphi 10.4 Sydney
 
#5

Re: komplexe Berechnungen -> Programm hängt

  Alt 9. Sep 2006, 12:46
Zitat:
Ich kann mir sehr gut vorstellen, dass der Aufruf von Application.ProcessMessages an performance kostet. Angenommen ich bau ein Timer ein, der alle 500ms Application.ProcessMessages aufruft, wird der Timer trotz der laufenden Berechnung dann gestartet?
Das ist eine gute Frage auf die ich keine Antwort weiß.

Ich würde es mit einer Laufvariablen versuchen.
Die wird bei jedem Schleifendurchgang erhöht

In etwa so:
Delphi-Quellcode:
if (i mod 50) = 0 then
  begin
    i:=1;
    application.processMessages;
  end
else
  inc(i);
Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat