I'm having trouble doing my Delphi application using the HTTPS protocol.
Below is a piece of code I'm using:
IniFile := TIniFile.Create('.\wrclnbi.ini');
SslContext := TSslContext.Create(SslContext);
SslContext.InitContext;
HttpsCli := TSslHttpCli.Create(HttpsCli);
HttpsCli.URL := Trim(IniFile.ReadString('URL', 'BaseHttps', ''));
HttpsCli.Proxy := '';
HttpsCli.NoCache := True;
HttpsCli.Accept := 'image/gif, image/x-xbitmap, image/jpeg, image/pjpeg,
application/x-shockwave-flash, */*';
HttpsCli.AcceptLanguage := 'en-us';
HttpsCli.ContentTypePost := 'application/x-www-form-urlencoded';
HttpsCli.Agent := 'Eversystems/1.0 (compatible; MSIE 6.0; Windows NT 5.1;
SV1)';
HttpsCli.Connection := 'keep-alive';
HttpsCli.Cookie := 'JSESSIONID=' + Trim(IniFile.ReadString('Cookies',
'JSESSIONID', ''));
HttpsCli.SendStream := TMemoryStream.Create;
HttpsCli.SendStream.Write(Data[1], Length(Data));
HttpsCli.SendStream.Seek(0, 0);
HttpsCli.RcvdStream := TMemoryStream.Create;
HttpsCli.Post;
After the HttpsCli.Post I get the following error: SSL requires a context
object.
I will be grateful if you could help me.
Thank you very much.
Fernando de Carvalho Gomes
São Paulo - Brazil.
_________________________________________________________________
Conheça os novos produtos Windows Live! Clique aqui.
http://www.windowslive.com.br
--
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
