Moin,
Delphi-Quellcode:
on e: EIdSocketError do
WriteClient('Email Disconnect Error:'+inttostr(e.LastError)+#9,PathSystem,'Client.log',True);
end;
Vielleicht solltest du es mal mit
Delphi-Quellcode:
on e:
Exception do
WriteClient('
Email Disconnect Error:'+inttostr(e.
Message)+#9,PathSystem,'
Client.log',True);
end;
probieren. Weil dann werden glaub ich alle exceptions abgefangen und nicht nur die SocketErrors.
Falls ich falsch liege, bitte ich um Berichtigung
MfG
Florian