[NumLock]

Код:

var
  document: OleVariant;
  stringlist: TStringList;
begin
  WebBrowser.Navigate('a b o u t : b l a n k');
  while WebBrowser.ReadyState<READYSTATE_INTERACTIVE do
    Application.ProcessMessages;
  stringlist:=TStringList.Create;
  try
    stringlist.LoadFromFile('test.htm');
    document:=WebBrowser.Document;
    document.clear;
    document.open;
    document.write(stringlist.Text);
    document.close;
    while WebBrowser.ReadyState<READYSTATE_COMPLETE do
      Application.ProcessMessages;
  finally
    stringlist.Free;
  end;
end;

a b o u t : b l a n k без пробелов писать. форум косячит иначе.