使用IdHttp访问Https网址时,要加一个IdSSLIOHandlerSocket控件,设置idhttp的IOHandler属性为IdSSLIOHandlerSocket控件。
procedure TForm1.Button1Click(Sender: TObject);
var
RData_TreatPost:string;
FormParam:TStrings;
begin
FormParam:=TStringList.Create;
。。。。。。。。。。。。。。。。
FormParam.Add('minititle=');
FormParam.Add('minipara=');
FormParam.Add('pstrong=');
FormParam.Add('longLogin=1');
FormParam.Add('llnick=');
FormParam.Add('sign=');
FormParam.Add('need_sign=');
FormParam.Add('not_duplite_str=');
FormParam.Add('need_user_id=');
FormParam.Add('from_encoding=');
RData_TreatPost:='https://login.taobao.com/member/login.jhtml';
Memo1.clear;
HtmlEdit1.HTML:=(IdHTTP1.Post(RData_TreatPost,FormParam));
Memo1.Li