Application.ProcessMessages() в собственных компонентах

[Cepguo]

Написал потомка от TWebBrowser а как при ожидании навигации выполнить Application.ProcessMessages() не знаю (TApplication не видим).
Конечно извратился через поиск:

__fastcall TWebrowser::TWebrowser(TComponent* Owner): TWebBrowser(Owner)
{ if(Owner)
  { TWinControl *WinControl = dynamic_cast<TWinControl *>(Owner);
    if(WinControl)
    { TWinControl *ParentControl = WinControl;
        while(1)
        { if(ParentControl->Parent)
          { ParentControl = ParentControl->Parent;
          }
          else break;
        }
        TComponent *Component = ParentControl->Owner;
        if(Component)
        { TApplication *Application = dynamic_cast<TApplication *>(Component);
          if(Application)
          {

но это не правильно, как вызвать диспетчера сообщений из собственных компонентов не используя TApplication ?
______________________
Используйте тег [CODE] (кнопка [CODE] в форме сообщения) при вставке кода на форум. Подробнее в FAQ

[Alex11223]

Сообщение от Cepguo

а как при ожидании навигации выполнить Application.ProcessMessages()

это так себе идея. Надо нормально использовать события.

Что вы сделать пытаетесь?
Если это какая-то автоматизация типа бота, то для такого проще всего взять Selenium на любом ЯП где он доступен. (зачем вам вообще Билдер в 2019 году? взяли б хоть Qt раз С++)

И TWebBrowser это IE. Его уже давно не обновляют, многие сайты перестают его поддерживать, и даже Майкрософт не считает его браузером.
А на некоторых сайтах по умолчанию вообще может включиться режим IE 7.

ЗЫ у вас странный стиль отступов.

[Cepguo]

TWebBrowser::Navigate(Addr);
while(Busy||ReadyState<READYSTATE_COMPLETE)
{ Application->HandleMessage();
}

Хочу дождаться READYSTATE_COMPLETE в своём компоненте, где TApplication не доступен,
т.е. вызвать диспетчер очередей без применения TApplication.

[Alex11223]

я про исходную задачу спрашивал, зачем вам браузер в билдере.

а так такие ожидания не стоит использовать, просто обрабатывайте события.

[Cepguo]

Поясните, пожалуйста, как организовать обработку события от браузера, подтверждающего его READYSTATE_COMPLETE ?

[Alex11223]

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

Если загружать надо много раз, то будет callback hell ))

Но Application.ProcessMessages() не особо лучше если нормально делать и с ним легко сделать фигню если тупо использовать как обычную синхронную функцию и не блокировать UI и т.д. А если вы еще и спрятали это внутрь компонента, то легко забыть где что.

Ну и вообще с TWebBrowser куча проблем, лучше понять как можно раньше, что вы выбрали неправильный инструмент, и взять что-то нормальное.

[Cepguo]

Да, всё там ... написано, сколько будет редиректов, столько и OnDocumentComplete.
Задача по отслеживанию истории вакансий на одном сайте (получится, то и многих),
парсинг приходится делать только после полной загрузки страниц и выполнения на них
всех скриптов. Ну и что же вместо TWebBrowser ?

[Alex11223]

я же сказал, для такой автоматизации самый простой вариант — Selenium, на любом ЯП где он доступен.

И С++ вообще плохой выбор для такой задачи, он тут не даст никаких преимуществ (производительность зависит в основном от сети и сервера) и только замедлит разработку.
Для такого берут что-то высокоуровневое типа Питона.
И GUI обычно не нужен для такого, часто хватает консоли, файлов и т.д.

[Cepguo]

Пока я прочитал только про Selenium, GUI только для Firefox (ведь на эти вакансии надо ещё поглядеть),
а историю вместо БД я куда положу ?

[Alex11223]

Selenium это библиотека для автоматизации браузеров. Там есть простая GUI версия для ФФ с записью действий, но это не нужно в данном случае.

Сообщение от Cepguo

а историю вместо БД я куда положу ?

в БД. В чем проблема с этим?