Hallöchen,
Ich hätte da mal ne Frage zu Threads und DLLs...
Nehmen wir mal MeinThread vom Typ TThread, der ordentlich was zu tun hat. Direkt in eine Anwendung eingebunden läuft alles sauber durch, MeinThread.Suspend und MeinThread.Resume klappen, MeinThread.Terminate klappt einwandfrei etc.
Nun eine
DLL drumgekapselt, mit ein paar Exports um eben den Thread zu starten, stoppen, oder pausieren. Hier der kritische Punkt:
Delphi-Quellcode:
function MeinThreadPause(): integer; stdcall;
begin
Result := -1;
if not Assigned(MeinThread) then begin
Result := -7;
end;
if MeinThread.Suspended then begin
MeinThread.Resume;
Result := 1;
end else begin
MeinThread.Suspend;
Result := 0;
end;
end;
Das Problem nun: der Thread pausiert einfach nicht! Starten und Anhalten klappt dagegen einwandfrei. Per Debugger in Suspend reingeschaut zeigt, daß das darin aufgerufene SuspendThread mit Erfolg aufgerufen wird.
Ein weiterer Aufruf von MeinThreadPause (zum resumen gedacht) erkannt dann halt Suspended, aber Resume (das ResumeThread darin) schlägt fehl.
Daß Synchronize in DLLs nicht klappt, ist mir bewusst, der Thread auch dementsprechend mit ner TCriticalSection abgesichert und getestet.
Ob/was man dem Thread antun muss, damit Suspend/Resume laufen, weiß ich leider nicht und hab auch via Google & co. nichts gefunden.
Wäre für Tipps dankbar
