Последние записи

made in programmersforum 5

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

25th
Мар

TChromium обработка клика

Posted by obzor under Delphi

Подскажите как можно отследить нажатие кнопки или элемента на сайте?

Допустим есть кнопка <button id=»777″>test</button>

В самом браузере кликаем на кнопку и получаем сообщение от Делфи.

DIONISKA

В теории можно сделать так:
1. На необходимый элемент повесить Event Listener когда ваша страница уже загружена, например в OnLoadEnd, и по его выполнению например выводить сообщение в консоль:

Код:

procedure Tfrmmain.Chromium1LoadEnd(Sender: TObject; const browser: ICefBrowser;
  const frame: ICefFrame; httpStatusCode: Integer);
begin
  frame.ExecuteJavaScript(
  'document.getElementById("777").addEventListener("click", function() { ' +
  ' console.log("button_777_clicked"); });', '',  0);
end;

В оригинальном CEF3 есть событие onQuery, но в CEF4Delphi не реализованно (как и в DCEF3), поэтому через консоль проще и быстрее.

2. Ждать и читать нужное сообщение в консоли (OnConsoleMessage):

Код:

procedure Tfrmmain.Chromium1ConsoleMessage(Sender: TObject;
  const browser: ICefBrowser; level: Cardinal; const message, source: ustring;
  line: Integer; out Result: Boolean);
begin
  if message='button_777_clicked' then
   begin
     //ваш код на нажатие
     ShowMessage('Button "777" click!');
   end;
end;

3. Наслаждаться результатом
Ещё как вариант можно поднять сервер и слать на него запросы из EventListener:

Код:

document.getElementById("777").addEventListener("click", function() {
	const request = new XMLHttpRequest();
	request.open("POST", "127.0.0.1:9090", true);
	request.setRequestHeader("Content-Type", "text/plain");
	request.send("777");
}

Или не поднимать, а искать и обрабатывать специфичный запрос. И тд и тп

FaTaL

Использовать Selenium. Но можно ли его использовать на Delphi не знаю. На C# очень просто и примеров на офсайте полно.

тема на форуме