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 idhttp友好错误信息的捕获

Delphi 获取文件修改时间

Delphi多线程图片转换类实现

Delphi中messagebox用法

Delphi四舍五入问题解决

Delphi中tinifile类 操作ini文件

Delphi 使用onvalidate事件或onvalidating事件验证在输入字段(tedit)中输入的值

Delphi 将对象转换为json字符串或tjsonobject

Delphi 字符串中加入换行符slinebreak

Delphi runtime error 216 程序退出后弹出错误

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



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...