1. Попробуй сначала гет запрос на http://neverlands.ru/
2. Добавить
Код:
idhttp1.Request.Referer:= 'http://neverlands.ru/';
3. Пост запрос
Код:
data:= TStringList.Create;
data.Add('player_nick=***'); //указать логин
data.Add('=Пароль'); //это не меняем
data.Add('player_password=***'); //указать пароль
s:= IdHTTP1.Post('http://neverlands.ru/game.php', data);
надо сделать поиск по ответу для проверки корректности логина и пароля
Код:
if Pos('Неверный логин или пароль', S)>0 then
ShowMessage('Неверный логин или пароль!')