Hallöle...

Ich möchte währen der Validierung der X-Rechnung (kann bis zu 10 Sekunden dauern) dem User über eine Marquee Progressbar eine Rückmeldung geben. "Ich arbeite noch"

Gegeben:
In der X-Rechnung Unit gibt es für die Ausführung ein...

Zitat:

cmd.SaveToFile(tmpFilename+'.bat',TEncoding.ANSI);

Result := ExecAndWait(tmpFilename+'.bat',''); // int.XRechnungValidationHelperJava (214)

_CmdOutput := CmdOutput.Text;

Das die GUI nicht reagiert war logisch. Deshalb habe ich dem Progress Fenster einen Thread verpaßt, der ein ApplicationProcessMessages (Anweisung von DevExpress ) während der Zeit regelmäßig ausführt.(Bild)

Problem:
Der Thread läuft...aber nur ein mal kommt der ins "Synchronize(SyncExecute)"...solange ExecAndWait noch nicht ausgeführt wird. Das Ganze ist dann komplett blockiert! Nach dem ExecAndWait macht der Thread weiter...aber zu spät.

Frage:
1. Kann ich die function TXRechnungValidationHelperJava.Validate( in einem Task/Thread zusätzlich ausführen?
2. Warum wird das ganze blockiert?

Danke...

Der Thread kann sich mit dem Hauptthread nicht synchronisieren, wenn dieser durch die länger dauernde Operation blockiert ist. Du solltest stattdessen die blockierende Operation in einen Thread verlagern.

Jupp, es gibt nur zwei drei Wege, um sowas zu lösen:

* Die Arbeit im Hauptthread, dann kann die VCL dort halt so lange nichts machen. (nur Grafik/Wartemauszeiger zu Beginn, währenddessen halt unbewegt und zum Schluß wieder weg ... in der Hoffnung Windows reagiert nach standardmäßig 3 Sekunden nicht mit "Fenster reagiert nicht mehr")

* Die Arbeit in einem Thread, dann kann der Hauptthread in Ruhe die Wartegrafik aktualisieren
* Arbeit im Hauptthread, aber dort wird z.B. über einen Callback oder regelmäßig ProcessMessages der Wartegrafik Zeit gegeben.
* Oder Arbeit im Hauptthread und die Wartegrafik im Thread.



Wir blenden z.B. bei längeren Aktionen, bzw. nach kurzem Warten, ein Fenster (nicht VCL) ein, in einem anderen Thread erstellt und behandelt, wo per Button oder per Strg+ESC (GetAsyncKeyState) abgebrochen werden kann.
Unsere DB-Komponenten haben eine Methode, womit man sie aus einem anderen Thread heraus abbrechen kann (also wo versucht wird dem DB-Server ein Abbruchsignal zu senden, bzw. die Connection getrennt wird, wodurch die wartende Aktion im Hauptthread abbricht)

Ursprünglich auch versucht die DB-Aktion in den Thread zu verschieben und das WarteZeugs im Hauptthread, aber trotz viel Arbeit mit Blocking, ConnectionPooling uvm. hatte es immer wieder mal geknallt, da ja öfters VCL-Komponenten und Events ungeschützt an den Queries hingen.

Moin...
Durch meine Erkältung bin grade gedanklich nicht so fit ...Beim Drüberlesen, und dem Gespräch mit Tbx, war es eigentlich klar. ExecAndWait läuft ja im Hauphread.

Zitat:

Du solltest stattdessen die blockierende Operation in einen Thread verlagern.

...wird auch gemacht.

Zitat:

Hallöle...

Ich möchte währen der Validierung der X-Rechnung (kann bis zu 10 Sekunden dauern) dem User über eine Marquee Progressbar eine Rückmeldung geben. "Ich arbeite noch"
snow rider 3d
In der X-Rechnung Unit gibt es für die Ausführung ein...
Zitat:
cmd.SaveToFile(tmpFilename+'.bat',TEncoding.ANSI);

Result := ExecAndWait(tmpFilename+'.bat',''); // int.XRechnungValidationHelperJava (214)

_CmdOutput := CmdOutput.Text;
Das die GUI nicht reagiert war logisch. Deshalb habe ich dem Progress Fenster einen Thread verpaßt, der ein ApplicationProcessMessages (Anweisung von DevExpress ) während der Zeit regelmäßig ausführt.(Bild)

Problem:
Der Thread läuft...aber nur ein mal kommt der ins "Synchronize(SyncExecute)"...solange ExecAndWait noch nicht ausgeführt wird. Das Ganze ist dann komplett blockiert! Nach dem ExecAndWait macht der Thread weiter...aber zu spät.

Frage:
1. Kann ich die function TXRechnungValidationHelperJava.Validate( in einem Task/Thread zusätzlich ausführen?
2. Warum wird das ganze blockiert?

Danke...

Task oder Thread: Du kannst die TXRechnungValidationHelperJava.Validate in einem separaten Task oder Thread ausführen, um die GUI nicht zu blockieren.

Async/Wait: Verwende einen asynchronen Ansatz mit Delphi's TTask oder TThread, um das Blocking zu vermeiden und die GUI responsive zu halten.

markieren

Code:

TTask.Run(procedure
begin
  Result := ExecAndWait(tmpFilename + '.bat', '');
  TThread.Synchronize(nil, procedure
  begin
    ProgressFenster.Close;
  end);
end);