Welkom bij de Tweaking4All gemeenschapsforums!
Voor je gaat deelnemen, bekijk de Forum Regels!
Specifieke onderwerpen: Start het onderwerp met de naam van het programma of systeem.
Bijvoorbeeld “MacOS X – Jouw vraag“, of bijvoorbeeld “MS Word – Jouw Tip of Truc“.
Merk op: Omschakelen naar een andere taal zal niet werken als je een post aan het lezen bent aangezien er waarschijnlijk geen vertaling beschikbaar is.
In een voorgaande post liet ik zien voor Windows hoe je met HTTPS een bestand kunt downloaden zonder OpenSSL nodig te hebben.
Voor macOS hebben we hier ook een trucje voor, zeker nu Apple het sterk afraad om OpenSSL te gebruiken.
Hierbij maken we gebruik van een 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;
N.b.: Ik heb Phil's units hier als attachment geplaatst, maar je kunt het natuurlijk ook direct van zijn website downloaden.
