Da steht in der Methode ein FCS.Free aber kein FCS := <...>.Create!
Die Mehrfachen blöcke mit
Delphi-Quellcode:
Synchronize(
Procedure
begin
frm_main.Writelog('....');
end
);
Sollte man mindestens in eine Threadfähige Queue stecken um eine bessere Entkopplung zu haben.