[Rakim4ik]

Ставлю код на кнопку:

Код:

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;

В чём может быть проблема ?