Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.03.09;
Скачать: CL | DM;

Вниз

WebBrowser.Document.All.Tags   Найти похожие ветки 

 
asdqwer   (2003-12-29 18:19) [0]

На днях получил совет по автоматическому нажиманию кнопок, отмечанию чекбоксов и т.д. в броузере со следующим кодом:
---
var
Doc:Variant;
Inputs:Variant;
I:Integer;
begin
Doc := WebBrowser1.Document;
Inputs := Doc.all.tags("Input");
for i:=0 to Inputs.Length-1 do
begin
// здесь делаем что-то с полями формы, например:
Inputs[i].Value:="Это функциональный элемент № "+inttostr(i);
end;
end;
Всё отлично работает, но возникает вопрос: что делать, если страница фреймовая? Может кто знает? Заранее спасибо.


 
easy ©   (2003-12-30 15:39) [1]

var
Doc:Variant;
Inputs:Variant;
I:Integer;
begin
Doc := WebBrowser1.OleObject.document.frames.item(1).document;
Inputs := Doc.all.tags("Input");
for i:=0 to Inputs.Length-1 do
begin
// здесь делаем что-то с полями формы, например:
Inputs.item(i, varEmpty).Value:="Это функциональный элемент № "+inttostr(i);
end;
end;


 
asdqwer   (2003-12-31 08:54) [2]

Огромное спасибо!



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

Текущий архив: 2004.03.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
1-25788
skas
2004-02-26 11:19
2004.03.09
Добавление панели выбора цвета


6-25848
Eugene
2003-11-21 13:04
2004.03.09
FastNet Delphi7


14-25898
DDA
2004-02-17 14:05
2004.03.09
Защита от RegShot , RegSnap


1-25795
Mixa3
2004-02-27 09:09
2004.03.09
Как записать строку в record?


14-25856
Думкин
2004-02-17 06:00
2004.03.09
С днем рождения! 17 февраля.