А так же indy, установил версию с svn-репозитория
И ТУТ НАЧАЛОСЬ........
В старых проектах вдруг посыпались краши с описанием "could not load ssl library" при использовании idHTTP - ни в какую не автоподгружаются библы ssleay32.dll + libssl32.dll + libeay32.dll, проверял даже ProcessMonitor-ом. ПОднял старого лазаря, скомпилил - всё нормально подгружается.
Дальше... создал пустой проект.... сделал кнопку и действие к ней....
Код: Выделить всё
procedure TForm1.Button1Click(Sender: TObject);
const
URL = 'https://www.google.ru';
var
Request : String;
HTML: String;
F: TextFile;
S: String;
IdHTTP1 : TIdHTTP;
IdSSL : TIdSSLIOHandlerSocketOpenSSL;
begin
IdHTTP1 := TIdHTTP.Create;
IdSSL := TIdSSLIOHandlerSocketOpenSSL.Create;
try
IdHTTP1.Request.ContentType:='text/html';
IdHTTP1.Request.Method := Post;
IdHTTP1.IOHandler := IdSSL;
HTML := IdHTTP1.Get(URL);
ShowMessage(HTML);
except
on E : Exception do
begin
ShowMessage(E.ClassName+' поднята ошибка, с сообщением : '+E.Message);
end;
end;
IdHTTP1.Free;
IdSSL.Free;
end;
end.
Ну и опять краш с описанием "could not load ssl library"
куда уж проще?Инди ставил впринципе так http://www.youtube.com/watch?v=S19VQ8PHCkg - только вот некоторые *pas-ы пришлось вытащить в корень компонента
ПРОШУ ПОМОЩИ!!!!!! Уже нет ни сил, ни идей как это побороть.....