[borockov]

Привет всем друзья. Друзья такой вопрос, никак не могу понять как сделать поиск слова в webbrowser. К примеру я программно авторизовался на каком то сайте, соответственно на данном сайте после авторизации появляется слово "выход". То есть я веду к тому что если после авторизации в webbrowser найдено слово "Выход" то выполнить некоторое действие. Вот как то так

[Alegun]

Ну если только речь не идёт об ОЛЕобъектах, где принцип работы совсем другой, "методичный", то можно просмотреть полученный текст странички обычным

Код:

if Pos('Выход', HTMLText) > 0 then ...

предусмотрев варианты искомого слова.

[borockov]

а в "html text" имеется ввиду подставить

Код:

WebBrowser.Document.documentElement.innerText

или я че то не так понял?

[Alegun]

Всё правильно понял.

[borockov]

В общем поступил немного другим образом, может это немного более извращенный вариант, но все же) Спасибо за помощь, все таки воспользуюсь твоим вариантом, он компактнее))

Код:

procedure TForm1.FormCreate(Sender: TObject);
begin
Timer1.Enabled:=True;
end;

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if Webbrowser1.Document<>nil then
    begin
      if Pos('Выход',WebBrowser3.oleobject.document.body.innerhtml) <> 0 then
      ShowMessage('1')
        else ShowMessage('0');

    end;
    end;
end.