[StinK]

Второй день мучаюсь с авторизацией на сайте. Верней с принятием куков (я думаю дело в них). При успешной авторизации по адресу http://site.ru/login/ идет редирект на http://site.ru/home/ , а при неуспешной - возврат на страницу логина. Так вот авторизация проходит, идёт редирект на http://site.ru/home/, но от туда уже кидает обратно на страницу логина, будто разлогинило (все запросы смотрел через HTTPAnalyzer). Хотя это так и есть. Как правильно куки принять и отправить обратно? В idHTTP AllowCookies := True, CookieManager := IdCookieManager1 (лежит на форме). Все что уже написал, ниже:

Код:

1 2 3 4 5 6 7 8 9 10 11

procedure TForm1.Button1Click(Sender: TObject); begin p:=Tstringlist.Create; p.Add('login='+Edit1.Text); p.Add('password='+Edit2.Text); i:=IdHTTP1.Post('http://site.ru/login/', p); if pos('logout', i) > 0 then WebBrowser1.Navigate('http://site.ru/') else Memo1.Lines[0]:='LOGIN FAILED'; end;