【pascal】IHTMLSelectElementの扱い

    begin
      iDoc3Test := iDoc2 as IHTMLDocument3;
      iEleTest := iDoc3Test.getElementById('lstSelect');
      ShowMessage(iEleTest.innerHTML);
      iEleTest.QueryInterface(IID_IHTMLSelectElement,iSelectEleTest);
      cntSelectTagTest := iSelectEleTest.length;
      for loopSelectTagTest := 0 to cntSelectTagTest - 1 do
      begin
        iDispTest := iSelectEleTest.item(loopSelectTagTest,0);
        iDispTest.QueryInterface(IID_IHTMLOptionElement,iOptionTest);
        iOptionTest.selected := True;
        ShowMessage(iOptionTest.text);
        iEleTest := iDoc3Test.getElementById('tdAttachView');
        iEleTest.click;
        iOptionTest.selected := False;
      end;
    end;

C#ですが、次は参考になりました。
blog.clockahead.com