почему Doc.Write(PSafeArray(TVarData... открывает браузер?

[alxsev]

var i:integer;
    Doc: IHTMLDocument2;
    v: OleVariant;
    DocA: IHTMLElementCollection;
    DocElement: IHtmlElement;
begin
  HTMLCode := IdHTTP1.Get('http://www.tietoy.org/pages.php?tabid=100');
  Doc := coHTMLDocument.Create as IHTMLDocument2;
  try
   Doc.designMode := 'on';
   while Doc.ReadyState <> 'complete' do Application.ProcessMessages;
   v := VarArrayCreate([0,0], VarVariant);
   v[0] := HTMLCode;   
   Doc.Write(PSafeArray(TVarData(v).VArray)); // почему здесь запускается браузер???
   Doc.designMode := 'off';
end;

как отключить запуск браузера при разборе строки