Главная страница
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.024 c
1-25801
garry79
2004-02-25 23:20
2004.03.09
Что за ListView дурацкий, то Итемы местами не меняются, теперь


11-25725
avakss
2003-06-19 18:42
2004.03.09
KOLFTP


1-25744
uUnknown
2004-02-26 19:21
2004.03.09
Чем может быть чреват следующий код?


1-25812
Grinder
2004-02-25 20:26
2004.03.09
StringList умная сортировка


8-25830
Kein
2003-10-27 18:55
2004.03.09
Вопрос к тем кто работал с DelphiX