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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 09.03.2015, 11:56   #1
Prize
 
Регистрация: 04.03.2015
Сообщений: 6
По умолчанию Как тыкнуть с помощью TWEBBROWSER по кнопке с onclick?

Цена разумеется меняется. Как тыкнуть ? Дайте код пожалуйста, т.к. с браузером не очень знаком.
Код HTML:
<a aria-disabled="false" role="button" class="button ui-button ui-widget ui-state-default ui-corner-all ui-button-text-only" href="#" onclick="BuyItem(384801319, 0, 554, '4783dfb8f6c21bbee8782cd474185b63')"><span class="ui-button-text">
                       Купить за 5.54 руб.
                     </span></a>
Вот тут можно увидеть кнопку: _ttp://goo.gl/qK8sxB
Prize вне форума Ответить с цитированием
Старый 09.03.2015, 16:27   #2
Streletz
Старожил
 
Регистрация: 03.01.2014
Сообщений: 2,870
По умолчанию

Сами пытались как-нибудь решить эту проблему?
Цитата:
Сообщение от Prize Посмотреть сообщение
Дайте код пожалуйста, т.к. с браузером не очень знаком.
Без обид. Помощь кодом только если есть код. Покажите Ваши наработки, пожалуйста.

Последний раз редактировалось Streletz; 09.03.2015 в 16:29.
Streletz вне форума Ответить с цитированием
Старый 09.03.2015, 17:03   #3
Prize
 
Регистрация: 04.03.2015
Сообщений: 6
По умолчанию

Цитата:
Сообщение от Streletz Посмотреть сообщение
Сами пытались как-нибудь решить эту проблему?

Без обид. Помощь кодом только если есть код. Покажите Ваши наработки, пожалуйста.

Код:
procedure TForm1.Button4Click(Sender: TObject);
var
ovElements: OleVariant;
I:integer;
begin
ovElements := WebBrowser1.OleObject.Document.forms.item(0).elements;
for i := 0 to (ovElements.Length - 1) do
if (ovElements.item(i).tagname = 'a') and
(ovElements.item(i).Href = '#') then
ovElements.item(i).Click;
end;
вот код, искал тег A, далее в этой строке адрес ссылки #. Но, разумеется кликнуть так и не смог. На самом деле у меня много вариантов клика было, и по тексту ссылки искал и по всякому, но так и не вышло. С онкликом ни разу не сталкивался, хотя что бы дойти до клика, на этом сайте нужно было авторизоваться 2 раза. 1 раз через сайт Steam. Все вышло хорошо, а вот по самой кнопке КУПИТЬ так кликнуть и не смог Надеюсь только на вашу помощь.

Поднимаю. Все еще актуально

Ап. Актуально. Есть вообще кодеры тут?

Последний раз редактировалось Stilet; 16.03.2015 в 18:02.
Prize вне форума Ответить с цитированием
Старый 15.03.2015, 11:38   #4
lomastr_
Форумчанин
 
Регистрация: 16.01.2015
Сообщений: 672
По умолчанию

чего надо? дебагером проходили? форма у вас есть?
lomastr_ вне форума Ответить с цитированием
Старый 15.03.2015, 18:12   #5
Prize
 
Регистрация: 04.03.2015
Сообщений: 6
По умолчанию

Цитата:
Сообщение от lomastr_ Посмотреть сообщение
чего надо? дебагером проходили? форма у вас есть?
Нужно как то нажать на эту заветную кнопку, сниффал запросы, хотел обычным пост запросом воспользоваться, но запроса не видно. Решил через браузер реализовать, все сделал (всю авторизацию), но нажать на кнопку не могу Форма разумеется есть, все сохранено.

Поднимаю. Кто нибудь поможет?

Последний раз редактировалось Stilet; 16.03.2015 в 18:02.
Prize вне форума Ответить с цитированием
Старый 16.03.2015, 15:09   #6
lomastr_
Форумчанин
 
Регистрация: 16.01.2015
Сообщений: 672
По умолчанию

Цитата:
Решил через браузер реализовать
плохое решение
lomastr_ вне форума Ответить с цитированием
Старый 16.03.2015, 15:20   #7
Streletz
Старожил
 
Регистрация: 03.01.2014
Сообщений: 2,870
По умолчанию

Цитата:
Сообщение от Prize Посмотреть сообщение
Нужно как то нажать на эту заветную кнопку
А, позвольте полюбопытствовать, зачем?
Цитата:
Сообщение от Prize Посмотреть сообщение
на этом сайте нужно было авторизоваться 2 раза. 1 раз через сайт Steam
Очередной бот или что-то в этом духе для стима?
Цитата:
Сообщение от Prize Посмотреть сообщение
Кто нибудь поможет?
Вряд ли. На этом форуме подобные вещи обсуждать как-то не принято.

Последний раз редактировалось Streletz; 17.03.2015 в 00:31.
Streletz вне форума Ответить с цитированием
Старый 16.03.2015, 16:52   #8
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

Цитата:
Очередной бот или что-то в этом духе для стима?
Скорее всего бот, который следит когда вещь появится в продаже по низкой цене (ну их вроде другие игроки выставляют на продажу), чтобы купить ее. В первом сообщении ссылка на магазин с внутриигровыми вещами для современного Counter Strike.

Цитата:
сниффал запросы, хотел обычным пост запросом воспользоваться, но запроса не видно.
Плохо сниффали значит.
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.

Последний раз редактировалось Alex11223; 16.03.2015 в 17:00.
Alex11223 вне форума Ответить с цитированием
Старый 16.03.2015, 17:03   #9
Prize
 
Регистрация: 04.03.2015
Сообщений: 6
По умолчанию

Цитата:
Сообщение от Alex11223 Посмотреть сообщение
Скорее всего бот, который следит когда вещь появится в продаже по низкой цене (ну их вроде другие игроки выставляют на продажу), чтобы купить ее. В первом сообщении ссылка на магазин с внутриигровыми вещами для современного Counter Strike.


Плохо сниффали значит.
Прямо в точку!


Работает не через стим, но тесно связан с ним. Не знал что не принято тут говорить о ботах. Хотя вроде как только спросил совета по нажатию кнопки. Попробую просниффать интерцептером. HTTPAnalyzer ничего не показал Но все таки, как же нажать на эту заветную кнопочку? Или же это очень муторно?
Prize вне форума Ответить с цитированием
Старый 16.03.2015, 17:11   #10
Человек_Борща
Старожил
 
Аватар для Человек_Борща
 
Регистрация: 30.12.2009
Сообщений: 11,434
По умолчанию

Я бы прошелся регуляркой по onClick элементов с атрибутом role="button", а затем вызвал бы в IHTMLWindow2.execScript код в onClick.

код сами напишите
Человек_Борща вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Выполнить OnClick в HTML из Delphi 7 при помощи TWebBrowser Sashka009 Помощь студентам 0 17.11.2013 23:08
Выполнить событие OnClick в HTML при помощи TWebBrowser в Delphi 7 Sashka009 Помощь студентам 0 16.11.2013 21:02
как вызвать в процедуре OnClick другую процедуру OnClick ? ddiipp Компоненты Delphi 7 07.09.2013 16:07
В TWebBrowser клик по кнопке wma57 Фриланс 3 27.07.2010 13:07
Twebbrowser - клик на кнопке cassidy Общие вопросы Delphi 2 10.05.2009 11:11