2011-11-06 141 views
0
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 protected]'); 
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庫...idHttp和HTTPS頁面登錄錯誤

我寫一個簡單的Delphi7的代碼(要登錄博客與我的應用程序),當我要運行它,它給我一個錯誤代碼如下;

和錯誤是「無法加載SSL庫」我拖動idHttp和IdSSLIOHandlerSocket1並將iohandler設置爲IdSSLIOHandlerSocket1。我能做些什麼來運行代碼?

回答

1

您必須在應用程序文件夾或system/win32文件夾中同時存在兩個SSL dll。

讓他們在這裏:http://indy.fulgan.com/SSL/

+0

我做到了,程序給了我另一個錯誤。那就是「連接到SSL出錯」是什麼?你有什麼主意嗎 ? –

+0

確保將方法設置爲sslvSSLv23,並將IPVersion設置爲id_ipv4。另外即時通訊假設您使用IdSSLIOHandlerSocketOpenSSL – Kevin

+0

是的我設置方法sslvSSLv23,但我使用IdSSLIOHandlerSocket我不在delphi 7中找到IdSSLIOHandlerSocketOpenSSL。它們是否一樣? –