Delphi：Webbrowser.Document - > IDで要素の存在を確認してください

Question

私はTWebbrowserコンポーネントといくつかのボタンを持っています。これまではうまくいきましたが、1つの手順でウェブサイトのボタンをクリックして、追加情報を表示したいときにクリックする必要があります。

だから私はこれを持っている：

WebBrowser1.OleObject.Document.GetElementByID('linkDtlC0-0').Click(); 
WebBrowser1.OleObject.Document.GetElementByID('linkDtlC0-1').Click(); 
WebBrowser1.OleObject.Document.GetElementByID('linkDtlC0-2').Click(); 

その後、私は上をクリックして次の3つの要素を表示するには、Webサイト上のボタンをクリックする必要があります。これまでのところ問題はありませんが、ボタンをクリックすると、サイトでは3つの要素を表示するのに数秒かかります。

問題： ボタンをクリックした直後に要素をクリックしようとすると、この名前で（まだ）要素がクリックされていないというエラーが表示されます。もちろん、私のプログラムは数秒待つことができます（もっと）確信してからクリックしようとしますが、私は時間を無駄にしたくありませんので、私の質問は です。名前）がTWebbrowser内のドキュメントに存在しますか？

Answer 1

要素が存在するかどうかをチェックし、：

uses 
    MSHTML; 

procedure TForm1.WebBrowser1DocumentComplete(ASender: TObject; const pDisp: IDispatch; const URL: OleVariant); 
var 
    Element: IHTMLElement; 
begin 
    if pDisp = TWebBrowser(ASender).ControlInterface then 
    begin 
    Element := (WebBrowser1.Document as IHTMLDocument3).getElementById('linkDtlC0-3'); 
    if Assigned(Element) then 
     Element.click; 
    end; 
end;