本文整理自网络,侵删。
//delphi获取IE路径
function GetIEAppPath:string;
var
iekey: Hkey;
iename: array [0..255] of char;
vType,dLength :DWORD;
begin
vType := REG_SZ;
RegOpenKeyEx(HKEY_LOCAL_MACHINE,'Software\Microsoft\Windows\CurrentVersion\App Paths\IEXPLORE.EXE',0,KEY_ALL_ACCESS,iekey);
dLength := SizeOf(iename);
if RegQueryValueEx(iekey, '' , nil, @vType, @iename[0], @dLength) = 0 then
Result := iename
else
Result := 'C:\Program Files\Internet Explorer\IEXPLORE.EXE';
RegCloseKey(iekey);
end;
相关阅读 >>
Delphi 在xp/2k 下实现 win+ctrl+del 等键的屏蔽的方法
Delphi firedac tfddatamove 导出csv
Delphi xe filesizebyname 要引用哪些文件
Delphi 用updateresource修改exe文件图标(已修正)
Delphi gettempdirectory 获取临时文件夹路径
更多相关阅读请进入《Delphi》频道 >>