[StinK]

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

Код:

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;

[ART]

долбаный Indy, как же он меня бесит... используй 10.5.7 или, что говорят еще - Synapse

[NumLock]

на прошлой неделе писал решение точно такой же проблемы, см. в моих сообщениях.

[StinK]

Сообщение от NumLock

на прошлой неделе писал решение точно такой же проблемы, см. в моих сообщениях.

Уже ищу
-----------
Нашёл http://www.delphisources.ru/forum/sh...22&postcount=7
Только оно какое-то длинное получается. Пошёл собирать

долбаный Indy, как же он меня бесит... используй 10.5.7 или, что говорят еще - Synapse

А как сделать, чтобы компоненты на панели появились? Пути к библиотекам синапса указал, а компоненты не появились.

[NumLock]

http://www.delphisources.ru/forum/sh...ad.php?t=17493 7 пост

[StinK]

Сообщение от NumLock

http://www.delphisources.ru/forum/sh...ad.php?t=17493 7 пост

Спасибо, нашёл уже

Только там ругается на необъявленную переменную ACookie. В остальном ошибок не выдает.
----------------------
Опять нашёл - ACookie : string;