Getting Info About MS IE 

// This sample shows how to get information about
// Microsoft Internet Explorer (3.0 and higher)
//
// !! add Registry in USES clause !!
//
procedure TForm1.Button1Click(Sender: TObject);
var
 R     : TRegistry;
begin
 R := TRegistry.Create;
 With R do
  begin
// Find Internet Explorer Location (MS recomends this way!)
    RootKey := HKEY_LOCAL_MACHINE;
    OpenKey('Software\Microsoft\Windows\CurrentVersion\App
             Paths\IEXPLORE.EXE', False);
    Edit1.Text := ReadString(''); // (Default)
    CloseKey;
// Find ActiveX storage (local cache)
    OpenKey('Software\Microsoft\Windows\CurrentVersion\Internet
             Settings\', False);
    Edit2.Text := ReadString('ActiveXCache');
//  Find Code base path
    Edit3.Text := ReadString('CodeBaseSearchPath');
    CloseKey;
// Find Version and Build number
    Edit4.Text := ReadString('Build');
    Edit5.Text := ReadString('IVer');
  end;
 R. Destroy;