Wie wird das OnChange-Ereignis von "Select" aufgerufen? (Delphi - WebBrowser)

Ich benutze Delphi und WebBrowser, um auf einer HTML-Seite zu navigieren. die seite hat eine combobox. Gibt es eine Möglichkeit, das OnChange-Ereignis aufzurufen?

Die ComboBox sieht so aus:

<select name="comboname" onchange="Some Javascript codes">

Auch habe ich diesen Code verwendet:

function TFrmMain.SetComboboxValue(WB: TEmbeddedWB;
  SelectName, ItemName: string): Boolean;
var
  iForms, iFormItems, iSelectItems: Word;
  FormItem: OleVariant;
begin
  Result := false;
  for iForms := 0 to WB.OleObject.Document.Forms.length - 1 do
  begin
    FormItem := WB.OleObject.Document.Forms.item(iForms);
    for iFormItems := 0 to FormItem.length - 1 do
    begin
      if (FormItem.item(iFormItems). type = 'select-one') and SameText
        (FormItem.item(iFormItems).Name, SelectName) then
      begin
        for iSelectItems := 0 to FormItem.item(iFormItems).Options.length - 1 do
        begin
          if SameText(FormItem.item(iFormItems).Options.item(iSelectItems)
              .Text, ItemName) then
          begin
            FormItem.item(iFormItems).SelectedIndex := iSelectItems;
            Result := true;
            Break;
          end;
        end;
      end;
    end;
  end;
end;

Aber es ändert sich nur der Wert.

Antworten auf die Frage(4)

Ihre Antwort auf die Frage