如何用delphi设置IE为默认浏览器 如何用delphi设置IE为默认浏览器, 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 注册表的干活。http://topic.csdn.net/t/20020216/12/530261.html var reg: TRegistry; s: String;begin reg := TRegistry.Create; reg.RootKey := HKEY_CLASSES_ROOT; reg.OpenKey('HTTP\Shell\open\command',False); s := reg.ReadString('');//读取注册表的值 如:"D:\Program Files\Maxthon3\Bin\Maxthon.exe" "%1"这个string就是浏览器默认的值,你可以用reg.writestring写入你想要的值,比如C:\windows\iexplorer.exe 有用户名和密码,如何登陆有登陆框的网址? ADO 用代码连不上???? 求房间使用状态图的制作思路 如何在一个对话框中调用另一个对话框,并且把它放在最前面,如果用户当时执行了全屏的程序,也要让全屏程序最小化来显示新调用的对话框 关于自定义消息和最小化时在状态栏单击图标怎样出现象金山词霸一样的菜单! 程序员如何保护自己? 票据打印的几个疑问? 关于MDI,请赐教..... 忍痛大放分!!!快来啊:)!!!!! ADOQuery里查询了一个Database是否存在后就不能关闭表了,总出错..... 设ie为默认浏览器,求代码一段,谢谢! 如何用delphi设置IE为默认浏览器,
reg: TRegistry;
s: String;
begin
reg := TRegistry.Create;
reg.RootKey := HKEY_CLASSES_ROOT;
reg.OpenKey('HTTP\Shell\open\command',False);
s := reg.ReadString('');//读取注册表的值 如:"D:\Program Files\Maxthon3\Bin\Maxthon.exe" "%1"
这个string就是浏览器默认的值,你可以用reg.writestring写入你想要的值,比如C:\windows\iexplorer.exe