delphi - 如何更改 Delphi Tchromium 中组合框的值？

Question

如何使用 Tchromium Delphi 更改组合框的值？版本Tchromimum DCEF3

<td class="droplabels" nowrap="nowrap">Лист</td>
<td colspan="3">
   <div class="ui-widget">
      <select id="sheet" name="sheet" style="font-size:0.7em;width:761px;" 
         class="form_select" onchange="showSheet(this.value);">
             <option value="1" selected="selected">Account List </option>
             <option value="2">Merchant list</option>
      </select>
   </div>
</td>

尝试过但没成功...
Chromium1.Browser.MainFrame.ExecuteJavaScript('document.getElementById("sheet").selectedIndex=2;', '关于:空白', 0);
Chromium1.Browser.MainFrame.ExecuteJavaScript('document.getElementById("providerField").onchange();', '关于:空白', 0);

Answer 1

上面有一个 ExecuteJavascript。因此您可以使用 Javascript 操作其上的所有内容。
如果您想更改该组合框值，请使用 DOM 进行更改。使用“document.getElementById”获取其 id，然后通过访问其 selectedIndex 来更改其 selectedIndex。
但是，这不会触发 onChange 事件。因此，您需要再次使用 javascript 手动调用它。

这是更改其 selectedIndex 的代码:

Chromium1.Browser.MainFrame.ExecuteJavaScript('document.getElementById("sheet").selectedIndex='+comboboxIndex+';', 'about: blank', 0);

手动触发 onChange 事件:

Chromium1.Browser.MainFrame.ExecuteJavaScript('document.getElementById("providerField").onchange();', 'about: blank', 0);    

将 Chromium1 更改为您的 TChromium 变量对象名称。

这里是有关 Select 的更多信息
http://www.w3schools.com/jsref/dom_obj_select.asp

如果您对 DOM 一无所知，请在此处阅读
http://www.w3schools.com/htmldom/default.asp简单来说，你只需要获取它的 DOM 对象，然后通过访问和修改它的属性来执行你想要的操作

抱歉我的英语不好。
已编辑