Ich glaube ich konnte das Problem, aber nicht die Ursache finden.
In IdPOP3.Connect:
Delphi-Quellcode:
if (IOHandler is TIdSSLIOHandlerSocketBase) then begin
case FUseTLS of
utNoTLSSupport :
begin
(IOHandler as TIdSSLIOHandlerSocketBase).PassThrough := true;
end;
utUseImplicitTLS :
begin
(IOHandler as TIdSSLIOHandlerSocketBase).PassThrough := False;
end
else
if FUseTLS<>utUseImplicitTLS then begin
(IOHandler as TIdSSLIOHandlerSocketBase).PassThrough := true;
end;
end;
end;
(IOHandler is TIdSSLIOHandlerSocketBase) Ist im funktionierenden Code wahr, in meinem falsch. Das kann ich mir nicht erklären, da in beiden Codes IdPOP3 der IOHandler IdSSLIOHandlerSocketOpenSSL zugewiesen wird.