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

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

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

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 03.07.2014, 22:13   #1
Rec0il
Пользователь
 
Регистрация: 16.03.2013
Сообщений: 69
По умолчанию Webbrowser нажать кнопку мыши.

Я дико извиняюсь, подобных тем очень много, но не один не работает у меня, наверняка что-то не так делаю.
Делаю бота для браузерной игры, старая игра, типа БК.

Мне нужно программно нажимать на кнопки в webbrowser.
В firefox навожу на кнопку, нажимаю ПКМ, иследовать элемент.
Там кнопка выглядит так:


Пробовал нажимать на нее вот этим кодом:
PHP код:
procedure TForm1.sButton1Click(SenderTObject);
var 
I:integer;
begin
for := 0 to WebBrowser1.OleObject.Document.all.tags('input').length 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
;
end;
 
end
Но кнопка не нажимается, вообще ничего не происходит.
Каким образом можно нажимать кнопки? Подскажите пожалуйста.

И еще хотел спросить, если нажимать их методом Mouse_event, то в свернутом окне она будет работать ?

Заранее спасибо.
Rec0il вне форума Ответить с цитированием
Старый 03.07.2014, 22:30   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

У тебя div а ищешь ты input - ничего не смущает?
И потом кажется за клик отвечает тег <a>, т.е тебе нужно искать в массиве
Код:
WebBrowser1.OleObject.Document.links
по имени класса btItemFR к примеру.
I'm learning to live...

Последний раз редактировалось Stilet; 03.07.2014 в 22:32.
Stilet вне форума Ответить с цитированием
Старый 03.07.2014, 22:54   #3
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

во первых WebBrowser1.Navigate(WebBrowser1.Lo cationURL + '?page=0')
во вторых вы что-то не то делаете
eval вне форума Ответить с цитированием
Старый 03.07.2014, 22:54   #4
Rec0il
Пользователь
 
Регистрация: 16.03.2013
Сообщений: 69
По умолчанию

Цитата:
Сообщение от Stilet Посмотреть сообщение
У тебя div а ищешь ты input - ничего не смущает?
Не могли бы вы более подробно объяснить, я не понимаю. Никогда не имел дела с сайтами.

Если вы имели в виду так:
Код:
for I := 0 to WebBrowser1.OleObject.Document.links('btItemFR').length - 1 do
   begin
   try
   if (WebBrowser1.OleObject.Document.all.tags('btItemFR').item(i).value='Àìóíèöèÿ') then
   WebBrowser1.OleObject.Document.all.tags('btItemFR').item(i).click;
   except
   end;
end;
То мне выскакивает окошко "Не поддерживается"

Если кликать по кнопка через Mouse_event, программа сможет работать в свернутом режиме ?

Простите если что за глупость, я новичок.

Цитата:
Сообщение от eval Посмотреть сообщение
во первых WebBrowser1.Navigate(WebBrowser1.Lo cationURL + '?page=0')
попробовал, страничка просто обновляется.

Последний раз редактировалось Rec0il; 03.07.2014 в 22:58.
Rec0il вне форума Ответить с цитированием
Старый 03.07.2014, 22:55   #5
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

Цитата:
Если кликать по кнопка через Mouse_event, программа сможет работать в свернутом режиме ?
и куда же вы кликать собираетесь?
eval вне форума Ответить с цитированием
Старый 03.07.2014, 22:59   #6
Rec0il
Пользователь
 
Регистрация: 16.03.2013
Сообщений: 69
По умолчанию

Цитата:
Сообщение от eval Посмотреть сообщение
и куда же вы кликать собираетесь?
На те кнопки на которые мне надо кликнуть, в самой игре, через Twebbrowser.
Rec0il вне форума Ответить с цитированием
Старый 03.07.2014, 23:06   #7
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

так они свернуты, т.е. их нет, сверните свой браузер с этой темой и кликните например на кнопку цитата, не кодом а просто реальной мышкой, получилось?
eval вне форума Ответить с цитированием
Старый 03.07.2014, 23:15   #8
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

Цитата:
попробовал, страничка просто обновляется
а что должна?
eval вне форума Ответить с цитированием
Старый 03.07.2014, 23:32   #9
Rec0il
Пользователь
 
Регистрация: 16.03.2013
Сообщений: 69
По умолчанию

Цитата:
Сообщение от eval Посмотреть сообщение
а что должна?
Должны появится шмотки, типа щит, броня и тд.. но ничего не появляется, как будто просто f5 нажал
Rec0il вне форума Ответить с цитированием
Старый 03.07.2014, 23:39   #10
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

тогда там цепляется скрипт
или делайте так как делали но не с инпутом а с 'а', или ищите какой скрипт и раньте его типа так http://www.delphidabbler.com/articles?article=21
eval вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
WebBrowser нажать на кнопку zlodey Работа с сетью в Delphi 4 04.07.2017 18:15
WebBrowser нажать на кнопку Terti Работа с сетью в Delphi 5 17.11.2013 16:42
нажать кнопку в Webbrowser Зод Работа с сетью в Delphi 1 16.11.2013 19:40
Нажать кнопку в WebBrowser rez1a Работа с сетью в Delphi 1 16.11.2013 10:00
Нажать на кнопку в webbrowser zver777 Работа с сетью в Delphi 4 14.10.2011 14:42