[VictorMBH]

Пишу в Delphi 7 программу, которая должна открыть сайт и взять с него текст.

Использую для отображения сайта компонент TWebBrowser. Большинство сайтов открывает без проблем, но при открытии сайта https://www.olx.ua/nedvizhimost/ при попытке перейти на страницу продаваемого обьекта сайт выдаёт такой вот текст: "Поточная версия вашего браузера устарела. Чтобы продолжить пользоваться OLX, откройте настройки браузера и обновите его до последней версии."

Версию IE указываю на FormShow:

Код:

   Reg:=TRegistry.Create;

   REG.RootKey:=HKEY_LOCAL_MACHINE;
   Reg.OpenKey('SOFTWARE\Microsoft\Internet Explorer\MAIN\FeatureControl\FEATURE_BROWSER_EMULATION',True);
    try
     IEVersion:=Reg.ReadInteger('RielterBrowser.exe');
     if(IEVersion<>11001)then
      Reg.WriteInteger('RielterBrowser.exe',11001);
    except
     try
      Reg.WriteInteger('RielterBrowser.exe',11001);
     except
      on E:Exception do
      ShowMessage('Ошибка открытия реестра: '+E.Message);
     end;
    end;
  Reg.CloseKey();

Админ: Пользуемся тегами при оформлении кода!

Что делать?