(Hier könnte ihre Werbung stehen)

Zitat:

Wenn das Hauptformular Zeit hat wird es dann die Progressbar aktualisieren.

Liegt das vielleicht an meinem Code?
Pseudo!

markieren

Delphi-Quellcode:

- MainForm > Button1Click
-- UnitX.Prozedur1 wird aufgerufen*
-- while-Schleife**
-- ein paar Sachen werden noch in UnitX.Prozedur1 erledigt
- wenn fertig, gehts zurück zu Button1Click (Aufrufer), ein paar Sachen werden noch erledigt und der Code ist beendet.

* diese Arbeit kann etwas dauern. In dieser Prozedur1 wird auch mein Thread erst erzeugt.
**Nachdem der Thread erzeugt wurde warte ich mit while ... solange der thread läuft ... do begin Application.ProcessMessages; Sleep(1000); end;

Wozu dann der Thread, wenn du eh Sleep im Mainthread aufrufst? Dann kannste auch alles gleich darin (im Button1Click) ausführen.

Zitat von TiGü:

Wozu dann der Thread, wenn du eh Sleep im Mainthread aufrufst? Dann kannste auch alles gleich darin (im Button1Click) ausführen.

Vermutung, weil er etwas in einen Thread ausgelagert hat, und sonst nicht weiß wie er "zurück" kommen soll?

Gruß
K-H

Das ist sehr alter Code.

Ohne die Threads (es gibt mehrere Worker-Threads) würde das gar nicht so funktionieren wie ich es möchte und wie es aktuell auch ist.

Zitat von Glados:

Ohne die Threads (es gibt mehrere Worker-Threads) würde das gar nicht so funktionieren wie ich es möchte und wie es aktuell auch ist.

Hast du mal Günthers Beispiel aus Beitrag #12 ausprobiert?

Ja. Wenn ich das so alles in meine MainForm packe funktioniert es. Deswegen ja meine Vermutung mit der While-Schleife.

Zitat von Glados:

Das ist sehr alter Code.

Ohne die Threads (es gibt mehrere Worker-Threads) würde das gar nicht so funktionieren wie ich es möchte und wie es aktuell auch ist.

Naja so ganz unproblematisch ist die Sache ja wohl nicht, aber im Augenblick ist das eher ein herumstochern im Nebel als Lösung eines konkreten Problems.

Gruß
K-H

Ich habe gerade etwas getestet und etwas herausgefunden.
Jeglicher Code der nach der While-Schleife (die ja nach der Erzeugung der Threads kommt) kommt, wurde jetzt weggelassen.
Button1Click wird ebenfalls per Exit nach Aufruf von UnitX.Prozedur1 sofort verlassen. Selbst dann funktioniert PostMessage nicht.

Dahingegen funktioniert im Thread aber sogar ein unsynchronisierted/un-queu'tes FrmMain.Caption := IntToStr(i);

Könnte es daran liegen, dass ich ein TApplicationEvents auf dem Form habe und ApplicationEvents1Message verwende?

Zitat von Glados:

Ich habe gerade etwas getestet und etwas herausgefunden.
Jeglicher Code der nach der While-Schleife (die ja nach der Erzeugung der Threads kommt) kommt, wurde jetzt weggelassen.
Button1Click wird ebenfalls per Exit nach Aufruf von UnitX.Prozedur1 sofort verlassen. Selbst dann funktioniert PostMessage nicht.

Woher weiß Du das?
Das Postmessage braucht eine Gegenseite, die die Message annimmt, und dann wird immer noch eine Anzeige benötigt.

Zitat von Glados:

Dahingegen funktioniert im Thread aber sogar ein unsynchronisierted/un-queu'tes FrmMain.Caption := IntToStr(i);

Zufall, geht 10.000 mal gut und dann macht es *Bumm*

Gruß
K-H