[NumLock]

Код:

program Project1;

{$APPTYPE CONSOLE}

uses
  ActiveX, ComObj, Variants, SHDocVw, SysUtils;

var
  WebBrowser: IWebBrowser2;

begin
  OleInitialize(nil);
  WebBrowser:=CreateOleObject('InternetExplorer.Application') as IWebBrowser2;
  WebBrowser.Navigate('http://site', EmptyParam, EmptyParam, EmptyParam, EmptyParam);
  { load & save }
  WebBrowser.Quit;
  WebBrowser:=nil;
end.