Главная страницаОбратная связьКарта сайта

Вывести результат запроса HTTP Post

Оформил: DeeCo
Автор: http://www.swissdelphicenter.ch

uses IdMultipartFormData;

 { .... }

 procedure TForm1.Button1Click(Sender: TObject);
 var
   data: TIdMultiPartFormDataStream;
 begin
   data := TIdMultiPartFormDataStream.Create;
   try
     { add the used parameters for the script }
     data.AddFormField("param1", "value1");
     data.AddFormField("param2", "value2");
     data.AddFormField("param3", "value3");

     { Call the Post method of TIdHTTP and read the result into TMemo }
     Memo1.Lines.Text := IdHTTP1.Post("?wurl=localhost/script.php", data);
   finally
     data.Free;
   end;
 end;

Обсудить статью на форуме


Если Вас заинтересовала или понравилась информация по разработке на Delph - "Вывести результат запроса HTTP Post", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу:

Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!
   


Copyright © 2008 - 2024 Дискета.info