Авторизация на сайте Delphi 2010

[KoBRaAndrey]

Не выходит авторизироватся на сайте, пишет что куки отключены.
На Delphi 7 все работает, как заставить работать на Delphi 2010?

var
  Post: TStringList;
  Http: TIdHTTP;

procedure TForm1.Button1Click(Sender: TObject);
var
  Buff: string;
begin
  Http := TIdHTTP.Create(nil);
  Post := TStringList.Create;
  Http.HandleRedirects := True;
  Http.Get('http://www.playground.ru');  
  Post.Add('name=MaximLol');
  Post.Add('password=a1b74922');
  Http.Post('http://users.playground.ru/login', Post);
  Buff := Http.Get('http://playground.ru'); 
  if Pos('Новых событий у друзей', Buff) <> 0 then
    ShowMessage('Авторизировались!') else ShowMessage('Не авторизировались!');
end;

[Voody]

Http.AllowCookies:=true;

[KoBRaAndrey]

Не помогает

[Пепел Феникса]

попробуйте куки менагер подключить.

[KoBRaAndrey]

Побывал, тоже не работает.
Причем на Delphi 7 без него работает

[gawrilowalex]

Ребят я новичок в Delphi только начинаю его изучать, у меня не получается сделать авторизацию на Delphi7 что бы в браузере уже залогинелся. Сама авторизация вроде норм, а вот в браузере не получается.
IdHTTP1.AllowCookies:=true;
IdHTTP1.HandleRedirects:=false;
data:=tstringlist.create;
WebBrowser1.Navigate('http://mobilesof.ucoz.ru/');
data.Add('ulogin='+edit1.text); // e"i^a~e`i' a"e"y" a`a^o`i^?e`c,a`o"e`e`
data.Add('pass='+edit2.Text); // i"a`?i^e"u" a"e"y" a`a^o`i^?e`c,a`o"e`e`
error:=false;
try
PageProfile:=IdHTTP1.Post('http://mobilesof.ucoz.ru', data);
except
error:=true;
end;

if not(error) then
begin
data.Clear;
data.Add('s='+Copy(PageProfile, Pos('value', PageProfile)+7, 56));
data.Add('op=slogin');
data.Add('redirect=1');
data.Add('expire=0');
data.Add('to=');
IdHTTP1.HandleRedirects:=true;
try
PageProfile:=IdHTTP1.Post('http://mobilesof.ucoz.ru', data);
WebBrowser1.Navigate('http://mobilesof.ucoz.ru');

except
end;
listbox1.items.add('Вы вошли');
end
else
listbox1.Items.Add('Не уадалась');

Data.Free;
end;
Помогите пожалуйста, я для своего сайта хочу сделать программку, и понять как она устроенна. Если есть код киньте мне не много легче будет понять там. Спасибо