Версии библиотек не верные
А вообще.. через синапс лучше.. он быстрее работает .... чем ИНДИ
Вот пример идеально работающий насинапсе
Код:
HTTP:=THTTPSend.Create;
HTTP.MimeType:='application/x-www-form-urlencoded';
HTTP.Headers.Clear;
HTTP.Cookies.Clear;
HTTP.Document.Clear;
Answer:=TStringStream.Create('');
POSTDATA:=TStringStream.Create('');
POSTDATA.WriteString('act=login');
POSTDATA.WriteString('&q=1');
POSTDATA.WriteString('&al_frame=1');
POSTDATA.WriteString('&expire=');
POSTDATA.WriteString('&captcha_sid=');
POSTDATA.WriteString('&captcha_key=');
POSTDATA.WriteString('&from_host=vk.com');
POSTDATA.WriteString('&from_protocol=http');
POSTDATA.WriteString('&ip_h=');
POSTDATA.WriteString('&email='+login);
POSTDATA.WriteString('&pass='+pass);
HTTP.Document.LoadFromStream(POSTDATA);
HTTP.HTTPMethod('POST','https://login.vk.com/?act=login');
if Pos('hash=',HTTP.Headers.Text) <> 0 then
begin
ShowMEssage ('Auth True!');
end;