HTTPS高分问题！高手狂入！(200分)

小弟最近开发一个项目，需要向一个服务器发起HTTPS请求，上传用户名和密码，然后由服务器告知是否登陆成功，也就是说要读取返回的内容。
换句话说，小弟想知道如何用DELPHI发起HTTPS请求，上传数据，然后读取Response。
我也查询了一些资料，很多高手说是用TIDHttp+TIdSSLIOHandlerSocket完成，但小弟实在不知如何实现，望各位高手给出简洁的代码，小弟先谢了，分数不够可以加！

顶起

找看有没有https控件

idhttp1.HandleRedirects:= true; //必须支持重定向否则可能出错
idhttp1.ReadTimeout:= CONST_ReadTimeout; //超过这个时间则不再访问
idhttp1.ConnectTimeout:=CONST_ReadTimeout;
IdHTTP1.Request.ContentType := 'application/x-www-form-urlencoded';

request:=TStringlist.Create;
Response:=TStringStream.Create('');
request.Add('abc');
IdHTTP1.Post(NetIp+'ort.asp',request,Response);
s:=Response.DataString;
request.free;
Response.free;