Registriert seit: 26. Jan 2011
351 Beiträge
Delphi 12 Athens
|
Thread und Event
10. Nov 2020, 12:22
Hallo,
ich habe hier eine globale Variable:
var StopEvent: THandle = 0;
Nun wird der Event in einem Thread verwendet:
procedure TTestThread.Execute;
var Abort: Boolean;
begin
StopEvent:=CreateEvent(nil, True, True, nil);
ResetEvent(StopEvent);
repeat
Abort:=WaitForSingleObject(StopEvent, 50)=WAIT_OBJECT_0;
//xxx
until Abort;
CloseHandle(StopEvent);
StopEvent:=0;
end;
Irgendwann setze ich:
SetEvent(StopRTEvent);
und beende den Thread.
Kann es sein das der Event ohne das ich SetEvent aufrufe fehlerhaft signalisiert wird?
Danke und beste Grüße
|