Zitat von
OG Karotte:
Erzeugst Du den Handler /
Pop3 immer noch händisch oder liegen die Teile auf der Form?
Liegen in der Form.
Zitat von
OG Karotte:
Kann es evtl. sein das Du im Objektinspektor entweder für den die IOHandler- und/oder die
POP3- Komponente etwas anderes als die defaultwerte eingetragen hast, die dann im Code von Dir nicht angepasst werden?
Also zum Beispiel bei dem IOHandler die zuverwendende IPVersion oder die SSLOptions?
Ja, aber das sind die selben Werte wie im funktionierenden Code
Zitat von
OG Karotte:
Ist UseTLS auf utUseImplicitTLS ???
Ja
Zitat von
OG Karotte:
Zeig doch nochmal den aktuellen Code....
Ok
In der unit1.pas:
Delphi-Quellcode:
idssliohandlersocketopenssl1 := Tidssliohandlersocketopenssl.Create(
nil);
idpop31 := tidpop3.Create(
nil);
idpop31.Host := server;
idssliohandlersocketopenssl1.Host := server;
idssliohandlersocketopenssl1.Destination := server +'
:995';
idpop31.Username := user;
idpop31.Password := password;
try
idpop31.Connect;
except
on E :
Exception do
begin
Memo1.Lines.Add('
ERROR: '+E.
Message+'
// '+E.ClassName);
end;
end;
In Unit1.dfm:
Delphi-Quellcode:
object IdPOP31: TIdPOP3
OnStatus = IdPOP31Status
IOHandler = IdSSLIOHandlerSocketOpenSSL1
AutoLogin = True
UseTLS = utUseImplicitTLS
Port = 995
SASLMechanisms = <>
Left = 432
Top = 16
end
object IdSSLIOHandlerSocketOpenSSL1: TIdSSLIOHandlerSocketOpenSSL
OnStatus = IdSSLIOHandlerSocketOpenSSL1Status
MaxLineAction = maException
Port = 995
DefaultPort = 0
SSLOptions.Method = sslvSSLv3
SSLOptions.Mode = sslmUnassigned
SSLOptions.VerifyMode = []
SSLOptions.VerifyDepth = 0
OnStatusInfo = IdSSLIOHandlerSocketOpenSSL1StatusInfo
Left = 440
Top = 48
end