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 firedac 如何按整型(byte)读取 mysql tinyint(1) 类型字段？

Delphi获取宽带ip

Delphi实现文件下载urldownloadtofile

Delphi - 利用dll编程控制摄像头实现拍照、录制视频

Delphi 获取鼠标当前位置的相对坐标

Delphi侦测按键输入

Delphi & c++ 安卓使用权限

Delphi xe7实现获取程序是否已管理员模式运行以及运行的windows用户名

Delphi vista和win7下如何弹出uac

Delphi 如何判断当前网卡是物理网卡

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

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