я немного не пойму. вот есть у меня код:
Код:
var list: TStringList;
response: TStringStream;
begin
response:=TstringStream.Create('');
list := TStringList.Create;
list.Add('username='+userlogin);
list.Add('password='+userpassword);
list.Add('login=');
try
IdHTTP1.Post('http://www.garena.com/portal/index.php',list,Response);
memo1.lines.text := response.DataString;
memo2.lines.add(IntToStr(IdHTTP1.ResponseCode));
finally
list.Free;
response.free;
idHTTP1.Disconnect;
end;
как его исправить чтобы работал????