Ошибка при авторизации

unit Unit1;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls;
 
type
  TForm1 = class(TForm)
    GroupBox1: TGroupBox;
    Label1: TLabel;
    Edit1: TEdit;
    Edit2: TEdit;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.Button1Click(Sender: TObject);
var
StrPage,ssylka:string;
log:TstringList;
begin
ssylka:='http://ts8.travian.ru/dorf1.php';
log:=TstringList.Create;
log.Add('name='+Edit1.Text);
log.Add('password='+Edit2.Text);
log.Add('s1=Войти');
log.Add('w=1280:1024');
log.Add('login=1382604577');
log.Add('lowRes=0');
StrPage:=idhttp1.Post(ssylka, log);
if pos ('logout', StrPage) <> 0 then
Label1.Caption:='Авторизовались'
else
Label1.Caption:='Неверный пароль';
log.Free;
end;
end.