Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Работа с сетью в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.11.2010, 00:28   #1
RIO
Форумчанин
 
Аватар для RIO
 
Регистрация: 15.12.2007
Сообщений: 422
По умолчанию Программное нажатие кнопки в TWebBrowser

Здравствуйте, посмотрел форум, но так ответа и не нашел. Как программное нажать кнопку, если ее код вот такой:

Код:
<input type="submit" value="Войти" class="enter" />
RIO вне форума Ответить с цитированием
Старый 16.11.2010, 15:31   #2
YYYYY
Пользователь
 
Регистрация: 16.08.2009
Сообщений: 28
По умолчанию

Блин! ВВеди в поиск "TWebBrowser" и получишь кучу ответов.
YYYYY вне форума Ответить с цитированием
Старый 16.11.2010, 23:52   #3
Bright-rider
Форумчанин
 
Регистрация: 09.07.2010
Сообщений: 102
По умолчанию

Код:
for I := 0 to WebBrowser1.OleObject.Document.all.tags('input').length - 1 do
   begin
     
   try
   if (WebBrowser1.OleObject.Document.all.tags('input').item(i).value='Войти') then
   WebBrowser1.OleObject.Document.all.tags('input').item(i).click;
   except
   end;
Bright-rider вне форума Ответить с цитированием
Старый 16.07.2011, 22:27   #4
BersiK
 
Регистрация: 08.06.2011
Сообщений: 3
По умолчанию

Цитата:
Сообщение от Bright-rider Посмотреть сообщение
Код:
for I := 0 to WebBrowser1.OleObject.Document.all.tags('input').length - 1 do
   begin
     
   try
   if (WebBrowser1.OleObject.Document.all.tags('input').item(i).value='Войти') then
   WebBrowser1.OleObject.Document.all.tags('input').item(i).click;
   except
   end;
Спасибо! Вы мне тоже очень помогли)
Использовал этот код так же для авторизации вконтакте))
BersiK вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Программное нажатие клавиш Damien4Damien Общие вопросы Delphi 2 17.10.2010 16:26
нажатие кнопки beygul Помощь студентам 2 30.01.2010 21:34
На нажатие кнопки access6472043 Microsoft Office Access 2 29.11.2009 15:08
Не срабатывает программное нажатие кнопки в чужом окне alxsev Общие вопросы Delphi 3 29.01.2009 20:32
нажатие кнопки xakkkkker Работа с сетью в Delphi 1 20.11.2008 01:08