| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

htmldocument и элемент web формы select

Andrey.Beliakov ©   (2008-09-06 23:20:00) 

Как можно попробовать вытащить список из web формы с помощью htmldocument для дальнейшей обработки! К примеру, записать его в combobox (это как пример). Совсем идей нет

---

Andrey.Beliakov   (2008-09-08 11:22:00) [1]

Спасибо огромное! Оказлось так просто

---

easy   (2008-09-07 21:04:00) [2]

procedure TForm1.FormCreate(Sender: TObject);
begin
 WebBrowser1.Navigate(' http://www.google.ru/advanced_search');
 ComboBox1.Style:=csDropDownList;
end;

procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject;
 const pDisp: IDispatch; var URL: OleVariant);
var
 select: OleVariant;
 i: integer;
begin
 select:=WebBrowser1.OleObject.document.all.item('lr');
 for i:=0 to select.length-1 do
   ComboBox1.Items.Add(select.item(i).innerText);
 ComboBox1.ItemIndex:=0;
end;

---

Наверх