0

Всем доброго времени суток!
Подскажите как реализовать? На форме webbrowser, при создании формы в нем открывается определенный сайт:

procedure TForm1.FormCreate(Sender: TObject);
begin
 WebBrowser1.Navigate('http://mysite.com/');
end;`

мне нужно чтобы при заходе только на определенную страницу сайта (допустим mysite.com/help) в программе открывалось второе окно (TForm2) со справкой.

3
  • Что пробовали? Что конкретно не получается? 27 янв 2014 в 6:12
  • У вебброузера есть событие при загрузке, там пишете проверку на адрес, если он совпадает, то открываете в новой форме
    – IVsevolod
    27 янв 2014 в 13:00
  • вы про OnNavigateComplete?
    – help
    27 янв 2014 в 13:54

1 ответ 1

0
procedure TForm1.WebBrowser1NavigateComplete2(Sender: TObject;
  const pDisp: IDispatch; var URL: OleVariant);

begin
  if (string(webbrowser1.LocationURL) = 'http://mysite.com/help') then /* тут ещё может быть адрес 'http://www.mysite.com/help' или ещё слэш на конце может быть*/
  begin
    form2.show;
  end
end;
1
  • спасибо,то что нужно!
    – help
    27 янв 2014 в 17:50

Ваш ответ

By clicking “Отправить ответ”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками или задайте свой вопрос.