![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TWebBrowser [D6]
Viking © (2002-03-05 15:48:00)Доброго времени суток уважаемые мастера.
У меня следующий вопрос: есть TWebBrowser, в него грузится страница на которой находится элемент типа ComoboBox. Как програмно выбрать одно из доступных значений?
Если можно, то с примером и на мыло.
Заранее спасибо.
Viking (2002-03-11 23:51:00) [1]Благодарен.
Лёша (2002-03-07 17:08:00) [2]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;
gek (2002-03-07 10:12:00) [3]http://www.euromind.com/iedelphi/index.htm
Cмотри
Viking (2002-03-07 10:01:00) [4]Похоже что знатооки перевелись...
Или нет?