Twebbrowser强制键盘输入

时间:2019-06-28 09:24:14

标签: twebbrowser

我正在该网站上测试数据抓取。 www.toolbank.com。 当您手动输入条形码('QuickSearchProduct'条形码='5035048648537')时,将显示搜索结果,我可以手动单击结果('qsproduct')并移至页面(以抓取数据)

使用Delphi,我可以填充输入(QuickSearchProduct)并使用以下代码设置焦点:

      WebBrowser1.OleObject.Document.getElementById('QuickSearchProduct').focus  ;


    // try a click 
    var
    Doc3: IHTMLDocument3;
    E: IHtmlElement;

    Doc3 := WebBrowser1.Document as IHTMLDocument3;
    Assert(Doc3 <> Nil);
    E := Doc3.getElementByID('QuickSearchProduct');
    Assert(E <> Nil);
    E.click;

我不能强迫'qsproduct'下拉,因此不能执行单击事件以移至产品页面。

有人知道要发送的事件以使浏览器认为条形码已手动输入吗?

0 个答案:

没有答案