Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 6 423

/ вопрос открыт /

Здравствуйте, эксперты!
На форме компонент WebBrowser1.
Необходимо как-то нажать на странице браузера Checkbox. В исходнике страницы, чекбокс имеет следующий код:

<input type="checkbox" name="agree" id="agree" onClick="freeze()">

Пробовал для нажатия использовать что-то вроде:
var
ovElements: OleVariant;
i: Integer;
begin
ovElements := WebBrowser1.OleObject.Document.Forms.Item( 0 ).Elements;
for i := 0 to ( ovElements.Length-1 ) do
if ( AnsiUpperCase( ovElements.Item( i ).tagName ) = 'INPUT' ) then
if ( AnsiUpperCase( ovElements.Item( i ).type ) = 'CHECKBOX' ) then
if ( ovElements.item( i ).Name = 'agree' ) then
ovElements.Item( i ).Click;
end;

но он не помогает...

С уважением, Вячеслав.

Слава Власов Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: Слава Власов (статус: Посетитель)
Вопрос отправлен: 10 мая 2013, 13:45
Состояние вопроса: открыт, ответов: 0.


Мини-форум вопроса

Всего сообщений: 2; последнее сообщение — 13 мая 2013, 10:23; участников в обсуждении: 2.
SnowLeo

SnowLeo (статус: 1-ый класс), 13 мая 2013, 07:10 [#1]:

Слава, а можете сказать, зачем вам его нажимать?
Вообще можно попробовать через исполнение JavaScript попробовать.
Слава Власов

Слава Власов (статус: Посетитель), 13 мая 2013, 10:23 [#2]:

Хочу автоматизировать регистрацию.
А пример исполнения можно?

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 22 февраля 2025, 11:39
Выполнено за 0.03 сек.