Простая функция-обертка для поста WinInet (в Delphi) - PullRequest
0 голосов
/ 15 декабря 2009

Вот способ сделать сообщение HTTP, используя Indy, в одну строку, более или менее:

Response := FIdHttp.Post(URL, StringStream);

Существует ли какая-либо функция (функция, а не библиотека), которая позволяет выполнять эквивалент с помощью WinInet?

Предпочтительно, функция, которая похожа на это:

function PostUsingWinInet(const URL, Data :string; SSL :boolean) :string;

Я не хочу изобретать велосипед и писать свою собственную функцию-обертку, если она уже существует.

Спасибо!

Ответы [ 2 ]

2 голосов
/ 16 декабря 2009

См. Этот вопрос переполнения стека: Как отправить HTTP-запрос POST в Delphi с помощью WinInet api .

1 голос
/ 16 декабря 2009

Взгляните на Synapse . Да, это библиотека, но не компонентная. Он предоставляет классы и простые функции блокировки, которые облегчают общение по протоколу TCP / IP.

Например, небольшая программа, которая выполняет сообщение (кстати, поддерживается ssl):

uses
  httpsend;

var
  url : string;
  urldata : string;
  PostData : tMemoryStream;

begin
    :
  if HttpPostURL(URL, URLData, PostData) then
    Writeln('Sent');
end.
...