Delphi-PRAXiS
Seite 3 von 4     123 4      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Thread Synchronize Fragen (https://www.delphipraxis.net/193263-thread-synchronize-fragen.html)

TiGü 10. Jul 2017 11:48

AW: Thread Synchronize Fragen
 
Zitat:

Zitat von Glados (Beitrag 1376370)
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?

Glados 10. Jul 2017 11:49

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

p80286 10. Jul 2017 11:49

AW: Thread Synchronize Fragen
 
Zitat:

Zitat von Glados (Beitrag 1376370)
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

Glados 10. Jul 2017 11:53

AW: Thread Synchronize Fragen
 
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
Delphi-Quellcode:
FrmMain.Caption := IntToStr(i);


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

p80286 10. Jul 2017 12:05

AW: Thread Synchronize Fragen
 
Zitat:

Zitat von Glados (Beitrag 1376376)
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:

Zitat von Glados (Beitrag 1376376)
Dahingegen funktioniert im Thread aber sogar ein unsynchronisierted/un-queu'tes
Delphi-Quellcode:
FrmMain.Caption := IntToStr(i);

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

Gruß
K-H

Glados 10. Jul 2017 12:07

AW: Thread Synchronize Fragen
 
Zitat:

Das Postmessage braucht eine Gegenseite, die die Message annimmt,
Das lese ich zum ersten mal.

Ich verwende eh schon TApplicationMessage. Kann ich da die PBM_SETPOS-Message abfangen?

jaenicke 10. Jul 2017 12:19

AW: Thread Synchronize Fragen
 
Zitat:

Zitat von Glados (Beitrag 1376365)
Liegt das vielleicht an meinem Code?
Pseudo!

Wie wäre es, wenn du dem Thread eine anonyme Methode übergibst und darin den Code ausführst, der nach der Abarbeitung der Threadaktionen laufen soll. Dann sparst du dir das ganze Warten usw.

p80286 10. Jul 2017 12:20

AW: Thread Synchronize Fragen
 
Zitat:

Zitat von Glados (Beitrag 1376381)
Zitat:

Das Postmessage braucht eine Gegenseite, die die Message annimmt,
Das lese ich zum ersten mal.

"BOOL PostMessage(

HWND hWnd, // handle of destination window
UINT Msg, // message to post
WPARAM wParam, // first message parameter
LPARAM lParam // second message parameter
);"

Was glaubst Du verbirgt sich hinter handle of destination window?

und dort wird die Message verarbeitet, und sei es durch ignorieren....

Gruß
K-H

Glados 10. Jul 2017 12:21

AW: Thread Synchronize Fragen
 
Ich weiß jetzt nicht genau wie das funktionieren soll, da ich einerseits in Button1Click am Ende etwas ausführe aber auch schon vorher nach der While-Schleife in UnitX.Prozedur1.
Einfach 2x das was du sagtest?

Zitat:

Was glaubst Du verbirgt sich hinter handle of destination window?
Ich betone es noch einmal. Ich habe nur diesen Code hier abgeguckt mehr nicht https://www.entwickler-ecke.de/topic..._106970,0.html
Von mehr habe ich auch keine Ahnung.

Zitat:

und dort wird die Message verarbeitet, und sei es durch ignorieren....
ich habe keine Ahnung wo dort sein soll.


Es funktioniert jetzt. Ich habe vorher laut Entwickler-Ecke das Handle der Progressbar übergeben.

Glados 12. Jul 2017 13:46

AW: Thread Synchronize Fragen
 
Ich habe jetzt soweit alle Synchronize und TTHread.Queue entfernt und durch PostMessage ersetzt.
Um das alles ordentlich handeln zu können habe ich ein paar const angelegt, die ich den PostMessage übergebe und dann in WndProc mit einem Case auswerte.
Das Case hat 7 Blöcke.

Ist das schon besser als für alles ein Synchronize zu verwenden? Die Bedienung der GUI fühlt sich, wenn Threads laufen und PostMessage's abschicken statt Synchronize ausführen, jetzt in jedem Fall wesentlich "flüssiger" an. Man merkt gar nicht mehr, dass im Hintergrund etwas arbeitet.

Meine Konstanten sind aber noch fragwürdig.
Delphi-Quellcode:
... = WM_USER + 1;
... = WM_USER + 2;
... = WM_USER + 3;
Geht das nicht besser als mit
Delphi-Quellcode:
WM_USER + N;
?


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:03 Uhr.
Seite 3 von 4     123 4      

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz