[VictorMBH]

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

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

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

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

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();

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

Что делать?