04.02.2010, 19:02
|
|
Познающий
Регистрация: 15.03.2009
Сообщений: 87
С нами:
9030319
Репутация:
34
|
|
PHP код:
procedure TForm1.Button8Click(Sender: TObject);
var StrPage, ssylka:string;
Data:TstringList;
begin
idhttp1.HandleRedirects:=true;
StrPage:=idhttp1.Get('http://***.jino.ru/panel/rcon.php/');
Data:=TstringList.Create;
Data.Add('ip=**.**.**.**');
Data.Add('port=7777');
Data.Add('pass=*****');
Data.Add('cmd=chat');
Data.Add('submit=Отправить запрос');
StrPage:=idhttp1.Post(ssylka, Data);
Data.Free;
end;
После этого всего нужно получить в memo1, ответ от страницы
Заранее спасибо.
Последний раз редактировалось 090808; 04.02.2010 в 19:07..
|
|
|