Узнать версию IE

[Janger]

Всем доброе утро.
Вот появилась проблема. Пытаюсь узнать версию своего IE.
Достал код:

function IE_installed(var Version: string): Boolean;
var
  Reg: TRegistry;
begin
  Reg := TRegistry.Create;
  with Reg do
  begin
    RootKey := HKEY_LOCAL_MACHINE;
    OpenKey('Software\Microsoft\Internet Explorer', False);
    if ValueExists('Version') then
      Version := ReadString('Version')
    else
      Version := '';
    CloseKey;
    Free;
  end;
  Result := Version <> '';
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  IE_Version: string;
begin
  if IE_Installed(IE_Version) then
    ShowMessage(Format('Internet Explorer %s installed.', [IE_Version]));
end;

Он мне выдаёт следующее, --> Internet Explorer 9.11.9600.17278 installed.
============
Но когда я смотрю версию версию программы IE, он мне пишет что моя версия: 11.0.9600.17278
============
Подскажите в чём дело?
Я уже несколько вариантов испробовал, он всегда выдаёт мне одно и тоже...

[Alex11223]

Там рядом есть svcVersion, в нем 11. Видимо для новых IE его смотреть надо.

[Janger]

Сообщение от Alex11223

Там рядом есть svcVersion, в нем 11. Видимо для новых IE его смотреть надо.

Вот из за чего не люблю работать с реестром.
К примеру в Windows XP стоит один путь, а у Windows 8.1 совершенно другой путь...

[min@y™]

Вопрос оффтоп: а нахрена, собственно? Как полученную информацию ты потом собираешься использовать на практике?

По делу: Версию программы можно прочитать прямо из VersionInfo самого ехе-шника. Могу доказать:

[Alex11223]

Возможно это сделано ради заботы о старом недософте, который проверяет версию по первой цифре.

if (ieVersion[0] <= '6')
    print 'Update IE!';

[indexx]

Версию программы можно прочитать прямо из VersionInfo самого ехе-шника

Но для начала нужно узнать путь к нему. И снова возвращаемся к реестру.

[min@y™]

Но для начала нужно узнать путь к нему. И снова возвращаемся к реестру.

Гений, ёмаё!

[indexx]

Сам ты гений. Насоветовал ерунду, будь мужиком признать.

[Alex11223]

А зачем реестр? Путь к Program Files и без реестра узнается через винапи.

[Пепел Феникса]

Сообщение от indexx

Сам ты гений. Насоветовал ерунду, будь мужиком признать.

путь то узнается однозначно.