[Gantiam]

Здравствуйте. Задался целью написать автологин в браузерную игру «1100ad.ru»

Сначала захожу на сайт:

Код:

  WebBrowser1.Silent:=true;
  webbrowser1.Navigate('http://1100ad.ru/');

Затем нужно отправить POST запрос который содержит логин и пароль. Сначала я узнал содержание POST запроса который отправляет браузер если логинится руками.
Выглядит он так:
POST http://1100ad.com/index.php login_security_code=&ip=&login=Donec2&password=123 456789&lst=0

В POST-запросе видно логин «Donec2» и пароль «123456789»

Далее пишу такой алгоритм:

Код:

  procedure TForm1.Button2Click(Sender: TObject);
  var
     Flags, TargetFrameName, PostData, Headers: OleVariant;
     S: String;
  begin
  S:='login_security_code=&ip=&login=Donec2&password=123456789&lst=0';
  //--------
  PostData := VarArrayCreate([1, Length(S) + 1], varByte);
      System.Move(S[1], VarArrayLock(PostData)^, Length(S) + 1);
      VarArrayUnlock(PostData);
      Headers :=
        'Content-Type: application/x-www-form-urlencoded'#10#13;
  //--------
  WebBrowser1.Navigate('http://1100ad.ru/index.php', Flags,   TargetFrameName, PostData, Headers);
  end;

Админ: Пользуемся тегами для оформления кода!

Но вместо того чтобы заходить в игру, в webbrowser выводится ответ от сервера (как я понял) в виде небольшого текста на белом фоне и дальше ничего не происходит.

Может кто-то подсказать что я делаю не так?