Marko Paunovic wrote: > procedure TCertificateWindow.sslClientSslHandshakeDone(Sender: > TObject; ErrCode: Word; PeerCert: TX509Base; var Disconnect: Boolean); > begin > Disconnect := FALSE; > end; > > procedure TCertificateWindow.sslClientSslVerifyPeer(Sender: TObject; > var Ok: Integer; Cert: TX509Base); > begin > Certificates.AddCertificate(Cert.GetRawText); > > Ok := 1; > end; > [/code] > > What happens after .GetAsync() is that none of these events get > called. I debugged further, and figured out that > OnSocketError(Sender: TObject); event gets called, but when I check > values of sslClient.CtrlSocket.LastError and > sslClient.CtrlSocket.LastSslError inside that event, they are zero. I > have also tried to call non-async .Get(), but I get same error.
Please test with OverbyteIcsHttpsTst demo and use the TIcsLogger component to write a detailed log file (enable all the log options in OI), then post the log content here. Note that file attachments will likely be stripped by the list server. -- Arno Garrels -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
