Simple wrapper function for WinInet post (in Delphi)

Question

Here is a way to do an HTTP post using Indy, in one line, more or less:

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

Is there a function out there (function, not library) that allows the equivalent to be done using WinInet?

Preferably, a function that resembles this:

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

I do not want to reinvent the wheel and write my own wrapper function if one already exists.

Thanks!

score 2 · Answer 1 · edited May 23 '17 at 12:16

2

See this Stack Overflow question: How to send a HTTP POST Request in Delphi using WinInet api.

edited May 23 '17 at 12:16

Community

1
1

answered Dec 16 '09 at 07:03

gabr

26,580
9
75
141

Thanks, but the function posted there is not self-contained; it relies on other functions the author wrote but did not post. – kes Dec 22 '09 at 15:33
No, it is not. It uses only WinInet and Sysutils and maybe Windows (can't bother to check). – gabr Dec 22 '09 at 15:51

score 1 · Answer 2 · answered Dec 15 '09 at 23:00

Take a look at Synapse. Yes it is a library, but not a component one. It exposes classes and simple blocking functions that take the pain out of TCP/IP communication.

For instance, a small program which performs a post (ssl is supported btw):

uses
  httpsend;

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

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

Simple wrapper function for WinInet post (in Delphi)

2 Answers2