Ставлю код на кнопку:
Код:
if pos(Edit1.Text,Chromium1.Browser.MainFrame.Source) <> 0 then
ShowMessage('Вижу:)')
else
ShowMessage('Не вижу :(');
Данный метод работает на ура.
Но если создаю поток и пытаюсь проиграть его в потоке, то не хрена он не видит.
Код:
procedure Test.Execute;
begin
if pos(Form2.Edit1.Text,Form2.Chromium1.Browser.MainFrame.Source) <> 0 then
ShowMessage('Вижу:)')
else
ShowMessage('Не вижу :(');
end;
В чём может быть проблема ?