var PageProfile:string; 
begin 
 IdHTTP1.AllowCookies:=true; 
 IdHTTP1.HandleRedirects:=true; 
 try 
  PageProfile:=IdHTTP1.Get('http://login.userapi.com/auth?site=2&id=0&fccode=0&fcsid=0&login=force&email=ТВОЁ_МЫЛО&pass=ПАСС'); 
 except 
 end; 
 if Pos('logout', PageProfile)<>0 then 
  Memo1.Lines.Add('Авторизация удалась') 
 else 
  Memo1.Lines.Add('Авторизация не удалась'); 
end;