URLDownloadToFile

URLDownloadToFile のサンプルコード。

uses URLMON;

procedure TForm1.FormCreate(Sender: TObject);
begin
  if URLDownloadToFile(nil, 'http://www.hoge.com/', 'hoge.html', 0, nil) = S_OK then 
    Memo1.Lines.LoadFromFile('hoge.html');
end;

Return index page