TWebBrowser

← →
Viking © (2002-03-05 15:48) [0]

Доброго времени суток уважаемые мастера.
У меня следующий вопрос: есть TWebBrowser, в него грузится страница на которой находится элемент типа ComoboBox. Как програмно выбрать одно из доступных значений?
Если можно, то с примером и на мыло.
Заранее спасибо.

← →
Viking © (2002-03-07 10:01) [1]

Похоже что знатооки перевелись...
Или нет?

← →
gek (2002-03-07 10:12) [2]

http://www.euromind.com/iedelphi/index.htm
Cмотри

← →
Лёша © (2002-03-07 17:08) [3]

procedure TForm1.ComboBox1Change(Sender: TObject);
var
Coll : IHTMLElementCollection;
Doc: IHTMLDocument2;
i: integer;
begin
Doc:= (WebBrowser1.Document as IHTMLDocument2);
if Doc<>nil then
begin
Coll:=Doc.All.Tags("SELECT") as IHTMLElementCollection;
for i:=0 to Coll.length-1 do
with (Coll.item(i,varEmpty) as IHTMLSelectElement) do
if name="Domain" {имя элемента SELECT} then
selectedindex:= ComboBox1.ItemIndex;
end;
end;

Благодарен.

TWebBrowser Найти похожие ветки