Welcome to the Tweaking4All community forums!
When participating, please keep the Forum Rules in mind!
Topics for particular software or systems: Start your topic link with the name of the application or system.
For example “MacOS X – Your question“, or “MS Word – Your Tip or Trick“.
Please note that switching to another language when reading a post will not bring you to the same post, in Dutch, as there is no translation for that post!
I posted this for Windows already a while ago, and one for macOS as well, but for some reason it wasn't showing here, so here again ...
Apple discourages the use of OpenSSL so we will use standard Apple framework calls.
For this I use a unit van Phil Hess:
uses ... ns_url_request ... // Note: "ns_url_request" uses Phil's "NSHelpers" unit.
...
function TForm1.GetURLContent(aURL:string):string;
var
HTTP: TNSHTTPSendAndReceive;
begin
HTTP := TNSHTTPSendAndReceive.Create;
HTTP.Method := 'GET';
HTTP.Address := aURL;
HTTP.SendAndReceive(Result);
HTTP.Free;
end;
Note: I've attached both unit here, but you can also download it from his website.
