Initial data commit
This commit is contained in:
parent
72d218235f
commit
f23f22d71c
199087 changed files with 3378941 additions and 0 deletions
16
Task/HTTPS/Pascal/https.pas
Normal file
16
Task/HTTPS/Pascal/https.pas
Normal file
|
|
@ -0,0 +1,16 @@
|
|||
{$mode objfpc}{$H+}
|
||||
uses fphttpclient;
|
||||
|
||||
var
|
||||
s: string;
|
||||
hc: tfphttpclient;
|
||||
|
||||
begin
|
||||
hc := tfphttpclient.create(nil);
|
||||
try
|
||||
s := hc.get('https://www.example.com')
|
||||
finally
|
||||
hc.free
|
||||
end;
|
||||
writeln(s)
|
||||
end.
|
||||
Loading…
Add table
Add a link
Reference in a new issue