Hi,
Delphi-Quellcode:
procedure Tfmain.FormDestroy(Sender: TObject);
begin
DeleteThread.Terminate;
try
DeleteThread.WaitFor;
except
end;
DeleteThread.Free;
Lock_Draw.Free;
Lock_Query.Free;
Lock_ClientCheck.Free;
Lock_UpdateList.Free;
Lock_NameCheck.Free;
end;
Das liegt sicher daran, das DeleteThread nicht beendet. Kommentier mal den Thread aus. Wenns dann beendet, dann wars der Thread...