Zitat von Glados:

Es ist besser lesbar und dafür gibt es 100 Punkte mehr als für PostMessage. Aber PostMessage, muss man leider sagen, ist wesentlich performanter wenn man das mehrere Tausend mal in 20 Sekunden ausführt.

Wir haben zufällig vor einiger Zeit eine alte Message-basierte Lösung auf TThread.Queue umgestellt.
Der Quelltext ist dadurch sehr viel kürzer und übersichtlicher geworden und wurde von der Performance her tendentiell eher etwas schneller. Einen großen eindeutig messbaren Unterschied gab es jedenfalls nicht und damit gewinnt der bessere Code.

Zitat:

Das mit der Performance kann ich ohne konkreten Anwendungsfall nicht beurteilen.

Beispiel 1: gegeben ist ein Thread welcher sich alle 25ms die Position einer ProgressBar holt.
Beispiel 2: gegeben ist ein Thread der alle 25ms die Position einer ProgressBar setzt.

Gerade bei Beispiel 2 konnte ich große Unterschiede bzgl eines ruckelfreien Hauptformulars feststellen.

Beispiel 3: der Thread ist schlau genug und muß das nicht alle 25ms tun

Mein Thread ist schlau genug er prüft vorher, ob sich die ProgressBar überhaupt bewegt hat ob es überhaupt etwas zu ändern gibt, indem ein paar Daten abgeglichen werden.

Zusätzlich habe noch so etwas drin

markieren

Delphi-Quellcode:

if (System.DateUtils.MilliSecondsBetween(Now, iCurrentTime) >= 500) then
 begin
  // hier jetzt prüfen, ob ProgressBar überhaupt gesetzt werden muss
  
  iCurrentTime := Now;
 end;

Ich komme jedenfalls gut klar mit den PostMessages. Ich finde es nun sauberer und perfomanter.