delphi获取默认浏览器

本文整理自网络，侵删。

 function TRATServer.GetDefaultBrowser:string;//delphi获取默认浏览器
var
reg: TRegistry;
begin
reg := TRegistry.Create;
try
reg.RootKey := HKEY_CLASSES_ROOT;
reg.OpenKey(‘HTTP\shell\open\ddeexec\Application’,false);
result:=reg.ReadString(”);
reg.CloseKey;
finally
reg.Free;
end;
end;

编程环境：WindowsXP_SP3+Delphi7
 

相关阅读 >>

Delphi 中 inputquery 实现密码输入

Delphi7判断字符是否是数字

Delphi 控制n个字符间距空格

Delphi2007-Delphi2010 程序不出现在任务栏的方法

Delphixe5如何获取android手机sim卡串号

Delphi 是否是闰年- isleapyear、isinleapyear

Delphi 控制台关闭指定窗口

Delphi 把单张图片保存到access数据库

Delphi bmp 转换jpg

Delphi deletefiles 删除目录下多个文件

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi获取默认浏览器