Показать сообщение отдельно
  #1  
Старый 22.10.2022, 15:38
fine fine вне форума
Прохожий
 
Регистрация: 22.10.2022
Сообщения: 4
Версия Delphi: CodeGear™ Delph
Репутация: 10
По умолчанию Автоматизирование действий, TWebBrowser

Добрый день.
На веб странице есть:
Код HTML:
<input type="input" id='input_value'.....> <button id='btn_find' ... > <input type="checkbox" name="chbox1" ...">

В memo1 загружены данные, которые надо по очереди вводить в поле input_value, нажать на btn_find, подождать несколько секунд и поставить галочку chbox1.
В идеале подождать до загрузки страницы, но страница загружается быстро, можно подождать скажем 3 сек. и перейти к следующему строку из memo1.
Код у меня такой:
Код:
for i := 0 to memo1.lines.Count - 1 do
begin
WebBrowser1.OleObject.Document.GetElementByID('input_value').value:=memo1.lines[i];
WebBrowser1.OleObject.Document.GetElementByID('btn_find').click();
//sleep(4000)
WebBrowser1.OleObject.Document.GetElementByID('chbox1').click();

end; 
Вместо sleep наверно надо использовать другой подход.
Прошу помочь.
Ответить с цитированием