![]() |
Thread Deadlock Problem
Hallo,
Ich habe ein kleines Problem, mit 2 Threads, die unter umständen in einen Deadlock Zustand kommen können. Ich würde das gerne vollends vermeiden, komme aber auf keinen grünen Zeig. Der erste Thread ist der MainThread, der einen SubThread startet und stoppt. Der Subthread führt in einer Schleife einige Datenbankabfragen durch und gibt in jedem Durchlauf Ergebnisse zurück. Sprich er soll sie sofort anzeigen. Da VCL nicht threadsicher ist, mache ich das mit Synchronize, damit das Anzeigen der Hauptthread übernimmt. Soweit so gut, das funktioniert auch. Nun weist der Haupthread aber irgendwann (zufällig durch Usereingabe) den Subthread zum halten an und wartet, bis dieser beendet ist. Der Subthread muss aber kontrolliert angehalten werden und den aktuellen Schleifendurchlauf beenden. Jetzt kann es vorkommen, dass da ein Synchronize steht. Hier wartet der Subthread dann, bis der Hauptthread die Anweisung ausgeführt hat. Der macht das aber nicht, weil er selbst auf die beendigung des Subthreads wartet. Egal wie ich es drehe, ich komme zu keiner vernünftigen Lösung. |
Re: Thread Deadlock Problem
Du könntest bei der Beendigung des Threads eine Fensternachricht schicken. Dann muss der Hauptthread nicht auf die Beendigung warten, sondern kann weiter Synchronize-Aufrufe bearbeiten.
|
Re: Thread Deadlock Problem
Was genau meinst du damit "eine Fensternachricht schicken"? Das Problem bei einem einfachen Fenster ist, dass der Hauptthread nachdem er den Subthread beendet hat noch weiter code ausführen soll.
|
Re: Thread Deadlock Problem
Habe das Problem jetzt gelöst. Zumindest scheint es so.
Delphi-Quellcode:
Der Hauptthread muss einfach ab und zu mal beim warten seine Nachrichtenschleife (eben die Synchronize-Aufrufe vom Subthread) abarbeiten. Dies mache ich mit Application.ProcessMessages. Zwar bezieht sich das auf den Prozess, aber da es hier um den Hauptthread geht schaint das in Ordnung zu sein. Wie kann ich denn einen gezielten Thread (z.B. TThread) zum abarbeiten seiner Nachrichten-Queue überreden?
while not SubThread.Suspended do // Warten bis Subthread gestoppt ist
begin Sleep(10); // Schlafen Application.ProcessMessages; // Nachrichten-Queue abarbeiten end; |
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:47 Uhr. |
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