Daniel Grillo
-
2011-04-04
I'm using EurekaLog and it detect a memory leak in this code:
// create thread
constructor TComThread.Create(AComPort: TCustomComPort);
begin
inherited Create(False);
FStopEvent := CreateEvent(nil, True, False, nil);
FComPort := AComPort;
// set thread priority
Priority := FComPort.EventThreadPriority;
// select which events are monitored
SetCommMask(FComPort.Handle, EventsToInt(FComPort.Events));
// execute thread
// {$IFDEF Unicode}Start; {$ELSE} Resume; {$ENDIF}
end;
Can someone help me?