Sourcecode kann man hier downloaden:
http://www.indyproject.org/Sockets/D...Indy10.DE.aspx
Ich habe da mal reingeschaut-die Sache ist relativ komplex.
Delphi-Quellcode:
// hier wird die Funktion "SslConnect" aus einer externen DLL (OpenSSL) aufgerufen
// siehe: [url]http://www.openssl.org/docs/ssl/SSL_connect.html#[/url]
error := IdSslConnect(fSSL);
if error <= 0
then begin
EIdOSSLConnectError.RaiseException(fSSL, error, RSSSLConnectError);
// das ist "deine" Exception
end;
Die
Exception EIdOSSLConnectError enthält noch zwei weitere Informationen:
die Properties
ErrorCode und
RetCode.
Delphi-Quellcode:
else if e is EIdOSSLConnectError then
E.Message := Format('Fehler beim Verbinden mit SSL! - %s'#13#10+
'ErrorCode=%d, RetCode=%d', [E.Message, EIdOSSLConnectError(E).ErrorCode, EIdOSSLConnectError(E).RetCode]);
Da
Indy Funktionen in OpenSSL aufruft, ist es wichtig, dass du die letzte Version von OpenSSL installiert hast.
Download hier:
http://www.openssl.org/related/binaries.html
Also hast du jetzt zwei Dinge zu tun: sicherstellen, dass OpenSSL 0.98g auf deinem Rechner ist und den ErrorCode/RetCode rausgeben.