對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;