如何用delphi作一个能够自动运行 同时又要把IE的主页修改了的程序? 请求大家多多 关注!!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 看看注册表,网上找一下delphi读写注册表的例子就知道了,很简单 procedure start; var Reg:TRegistry; begin Reg:=TRegistry.Create; Reg.RootKey:=HKEY_LOCAL_MACHINE; Reg.OpenKey('\SOFTWARE\Microsoft\windows\CurrentVersion\Run\',true); if ppl[6]='-1' then begin Reg.WriteString('程序路径'); end 改IE主页:这是由于注册表HKEY_USERS\.DEFAULT\Software\Policies\Microsoft\Internet Explorer\Control Panel 下的DWORD值“homepage”的键值被修改的缘故。原来的键值为“0”,被修改为“1”(即为灰色不可选状态)。 排除办法:将“homepage”的键值改为“0”即可可以根据上面的方法自已写了 钩子,我刚刚做了一个钩桌面刷新的小程序,用来使windows桌面图表背景透明,刷新后保持透明做IE钩子更简单 创建字段后直接更新值,会报错,请大家进来帮帮忙。 请问如何在virtual treeview中如何改变选中一行的颜色? while not eof do 存储过程传参数的问题??? 如何使用treeview目录树控件,它不像菜单那样,没有单击事件啊, 求教!! DELPHI中使用SQL好象十分困难。有无什么地方介绍其语法规范啊? Delphi初学者的迷惑。 关于MDIchild窗体关闭出错的问题 请教:关于DELPHI中一个Web Services 的调用问题? DBGrid的简单问题 扫描仪扫描后ImgEdit显示不出图像 idmessage怎么接收多个附件的邮件?
var
Reg:TRegistry;
begin Reg:=TRegistry.Create;
Reg.RootKey:=HKEY_LOCAL_MACHINE;
Reg.OpenKey('\SOFTWARE\Microsoft\windows\CurrentVersion\Run\',true);
if ppl[6]='-1' then
begin
Reg.WriteString('程序路径');
end
这是由于注册表HKEY_USERS\.DEFAULT\Software\Policies\Microsoft\Internet Explorer\Control Panel
下的DWORD值“homepage”的键值被修改的缘故。原来的键值为“0”,被修改为“1”(即为灰色不可选状态)。 排除办法:将“homepage”的键值改为“0”即可
可以根据上面的方法自已写了
做IE钩子更简单