Получить версию IE

uses
 
  Registry; 

function
 GetIEVersion(Key: string
): string
; 
var
 
  Reg: TRegistry; 
begin
 
  Reg := TRegistry.Create; 
  try
 
    Reg.RootKey := HKEY_LOCAL_MACHINE; 
    Reg.OpenKey('SoftwareMicrosoftInternet Explorer', False
); 
    try
 
      Result := Reg.ReadString(Key); 
    except
 
      Result := ''; 
    end
; 
    Reg.CloseKey; 
  finally
 
    Reg.Free; 
  end
; 
end
; 


procedure
 TForm1.Button1Click(Sender: TObject); 
begin
 
  ShowMessage('IE-Version: ' + GetIEVersion('Version')[1] + '.' 
    + GetIEVersion('Version')[3]); 
  ShowMessage('IE-Version: ' + GetIEVersion('Version')); 
  // <major version>.<minor version>.<build number>.<sub-build number> 
end
;

Другое по теме:

• Очистка кэша в IE
• WEB страничка внутри Delphi приложения
• Автоматическое заполнение HTML-форм в браузере