IdHTTP1, POST запрос, ошибка

[spirit-ua]

Всем Привет!

 try
   LoginInfo := TStringList.Create;
   Response := TStringStream.Create('');
   LoginInfo.Add('username=MyName');
   LoginInfo.Add('password=MyPass');
   IdHTTP1.Post('http://localhost/login.php',LoginInfo,Response);
   Showmessage(Response.DataString);
 finally
   begin
     Response.Free;
     LoginInfo.Free;
   end;
 end;

вылетает ошибка "Access Violation... 0054150С" хотя в браузере страничка грузится, что не так?

Помогите

[bilibian]

Если нужно подлогиниться и получить html, то:

var 
   LoginInfo:TStringList;
   html:string;
begin
   LoginInfo := TStringList.Create;
   LoginInfo.Add('username=MyName');
   LoginInfo.Add('password=MyPass');
   try
      html:=IdHTTP1.Post('http://localhost/login.php',LoginInfo);
      showmessage(html);
   finally
      LoginInfo.Free;
   end;
end;