05-15-2013، 03:28 PM
درود
با سورس زیر میتونید ورژن اینترنت اکسپلور رو در دلفی یدست بیارید.GetIEVersionStrThe the version of Internet Explorer installed on the computer. Returns '' if IE is not installed or if it is earlier than v4.Required units: Windows, Registry.Required snippets: None.See also: None.
با سورس زیر میتونید ورژن اینترنت اکسپلور رو در دلفی یدست بیارید.GetIEVersionStrThe the version of Internet Explorer installed on the computer. Returns '' if IE is not installed or if it is earlier than v4.
کد پیاچپی:
کد پیاچپی:
[code]
function GetIEVersionStr: string;
var
Reg: Registry.TRegistry; // registry access object
begin
Result := '';
Reg := Registry.TRegistry.Create;
try
Reg.RootKey := Windows.HKEY_LOCAL_MACHINE;
if Reg.OpenKeyReadOnly('Software\Microsoft\Internet Explorer') then
begin
if Reg.ValueExists('Version') then
Result := Reg.ReadString('Version');
end;
finally
Reg.Free;
end;
end;
[/code]
کد پیاچپی: