[Delphi (Object Pascal)] Delphi获取IE版本号 →→→→→进入此内容的聊天室

来自 , 2021-04-02, 写在 Delphi (Object Pascal), 查看 151 次.
URL http://www.code666.cn/view/9087cd8b
  1. function GetIEVersionStr: string;
  2. var
  3.   Reg: Registry.TRegistry; // registry access object
  4. begin
  5.   Result := '';
  6.   Reg := Registry.TRegistry.Create;
  7.   try
  8.     Reg.RootKey := Windows.HKEY_LOCAL_MACHINE;
  9.     if Reg.OpenKeyReadOnly('Software\Microsoft\Internet Explorer') then
  10.     begin
  11.       if Reg.ValueExists('Version') then
  12.         Result := Reg.ReadString('Version');
  13.     end;
  14.   finally
  15.     Reg.Free;
  16.   end;
  17. end;
  18. //delphi/2261

回复 "Delphi获取IE版本号"

这儿你可以回复上面这条便签

captcha