Главная страница
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.04 c
4-25964
uns
2004-01-01 22:36
2004.03.09
Контектное меню IE


8-25834
WondeRu
2003-11-04 11:23
2004.03.09
Глюк!


14-25869
arbin
2004-02-17 10:09
2004.03.09
Компенсация жертвам теракта на Дубровке


3-25684
Alexei Sviridov
2004-02-11 09:25
2004.03.09
ключики в Interbsase


14-25894
ИМХО
2004-02-16 03:23
2004.03.09
В чем причина феноменального успеха Microsoft Corp.?