对IE编程中的一些经验

1 启用了线程，
  function GetDoc(Wnd: HWND) : ihtmldocument2;
  往往会出现错误，这个时候可以结合定时器来解决

2   obj := doc.all.item('sb_header', 0);
    if  TVarData(obj).VLongWord   >  0 这是判断一个对象的语句 很实用

3 IE7 WndTab := FindWindowEX(Wnd, 0, 'TabWindowClass', nil);

4   Wnd := FindWindow('Internet Explorer_TridentDlgFrame', pchar('信息提示 -- 网页对话框'));
  if (Wnd > 0) then  begin
     PostMessage(Wnd,WM_CLOSE,0,0);
  end;

5 调用脚本语句：
function  InvokeScriptCommom(   tmpDocument2:   IHTMLDocument2; tmpScriptName: WideString; Params :  array of const  ):Variant;