TWinHTTP

Dec 31, 2017 18:07 · 15 words · 1 minute read

uses
  SynCrtSock;

{$R *.dfm}

procedure TForm1.btn1Click(Sender: TObject);
begin
  mmo1.Lines.Add( TWinHTTP.Get('https://www.baidu.com'));
end;

静态调用