delphi - idHttp和Https页面登录错误

Question

procedure TForm1.btnGirisClick(Sender: TObject);
var
post:tstringlist;
get:TStringStream;
begin
post:=TStringList.Create;
get:=TStringStream.Create('');
try
post.Clear;
IdHTTP1.Disconnect;
post.Add('email=xxx@xxx.com');
post.Add('pass=xxxx');
IdHTTP1.Post('https://www.facebook.com/login.php',post,get);
Memo1.Text:=get.DataString;
except
on e: exception do begin
memo1.text:='';
end;
end;
post.Free;
get.Free;
end;
end.

我需要关于 idHttp 和 ssl 库的帮助...

我写了一个简单的delphi7代码（想用我的应用程序登录facebook），当我想运行它时，它给了我一个错误，代码如下；

并且错误是“无法加载 SSL 库”我拖动 idHttp 和 IdSSLIOHandlerSocket1 并将 iohandler 设置为 IdSSLIOHandlerSocket1。我该怎么做才能运行代码？

Answer 1

您必须在应用程序文件夹或 system/win32 文件夹中拥有这两个 SSL dll。

在这里获取它们：http: //indy.fulgan.com/SSL/