Скачать: CL | DM;

htmldocument и элемент web формы select   Найти похожие ветки 

← →
Andrey.Beliakov ©   (2008-09-06 23:20) [0]

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

---

← →
easy ©   (2008-09-07 21:04) [1]

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;

---

← →
Andrey.Beliakov ©   (2008-09-08 11:22) [2]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.053 c