自从微软捆绑了IE以后,网虫们便注定了要永远地面对那一成不变的微软模式:窗口、按钮和
www.microsoft.com网站,从用户的角度,我们希望能够拥有自己特色的IE;从商业运作角度,商人希望无处不有他们公司的宣传信息,希望IE一经运行便可自动进入他们的网站。下面笔者介绍一种用VC6编程,通过修改注册表来改变IE面貌的方法。
X(~NpL R @xo9'M<l VC修改注册表的方法与函数
7y!{lr=n 注册表是由树干和键组成的,对注册表的修改便是对键的修改。
WukD|BCC 首先,要对键修改需先得到要修改键的句柄,VC中为键打开一个句柄,可采用的函数为LONG RegOpenKey命令;然后才能对键进行修改,用SetRegValue命令;最后需要释放得到的键句柄,用RegCloseKey(hResult)命令。
idHBz*3~ps YRFM1?* 通过修改注册表实现IE换貌
r?{tBju^ 我们都知道,在注册表中,IE的主要设置内容在键HKEY_CURRENT_USER 下面的Software\\Microsoft\\Internet Explorer中,例如,我们想对IE的启动初始访问页进行定义修改,便可以把Software\\Microsoft \\Internet Explorer\\Main下的“Start Page”设置为需要的网址,如“
www.ccidnet.com”。另外通过修改键HKEY_CURRENT_USER和键HKEY_LOCAL_MACHINE 下面的Software \\Microsoft\\Internet Explorer\\Toolbar里“BackBitmap”和“BackBitmapIE5”的值,即可加入用户特定的背景图案。我们通过以下代码可实现对IE的改造: void CJhfDlg::OnAddAddress()
6B=J*8
Hs zrcSPh {
~_Aclm? S[Et!gj: if(AddressNum==0){
d}1R<Q;F tG'c79D\ AfxMessageBox("没有可应用的选项!");
L]Uy+[gg 8WMC ~ return;
+u7mw<A
8 iVE+c"c!2& }
c(fwl`y!x %j
yLRT]H CString address;
C.eZcNJG b$hQB090 int sel=m_address1.GetCurSel();
tlE+G@|^ ]. eGsh2 if(LB_ERR ==sel){
ral0@\T >Gkkr{s9 AfxMessageBox("请先选中要应用的选项!");
n,`&f~tap `3~w#?+=* return;
[dL#0~CL$ rLVS#M#&e> }
/J^yOR9 :%R3(
& m_address1.GetText(sel,address);
E8/P D vq|W& //取得所需加入的网址字符串
@l 1 piz8 K:mb$YJ& CString strKey="Software\\Microsoft\\Internet Explorer\\Main";
Vx'_fb?wap BQsy)H`4E HKEY hResult;
_15r!RZ:1 :2La, RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
h<[ o;E a!;?!f-i //得到欲修改键的句柄
?g1%-F+ "!2Fy-Y SetRegValue(HKEY_CURRENT_USER,strKey,"Start Page",address);
>#SQDVFf qvCl
mZ RegCloseKey(hResult);
s{!F@^a Y>r9"X|&H //修改注册表相应的值并释放键句柄
Pt E>08 R ~#\gMs }
-YD6 VK8 5A 2.给工具条指定用户特定的背景图案
QM
O OJA p tMysYT' void CJhfDlg::OnAddBackGround()
;sDFTKf Gt' %:9r {
wT;D<rqe` !RV}dhI if(PictureNum==0){
+PjH2 ? r^+- AfxMessageBox("没有可应用的选项!");
7tJPjp4l ^J?I-LG return;
!9B)/Xi YoJN.],gf }
+`zM^'^$ -3A#a_fu CString picture;
&{99Owqg VB\oK\F5z int sel=m_PicList.GetCurSel();
w[t!?(![> Drz#D1-2 if(LB_ERR ==sel){
7Q2"]f,$CQ ZdfIe~Oni AfxMessageBox("请先选中要应用的选项!");
<^{|5u ULj'DzlfH return;
|\J8:b>} Q
u{#4qToA }
7YrX3Hx8 a~=$9+?w m_PicList.GetText(sel,picture);
|}t[-a j'g':U //取得所需加入背景图案文件路径
C[gy{40} WbB0{s CString strKey="Software\\Microsoft\\Internet Explorer\\Toolbar";
C[z5&
x2 @#xh)"} HKEY hResult;
)Z2HzjE @|sDb?J RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
u?r=;:N|y %i:Sf //得到欲修改键的句柄
Ou>L|#=! #**vIwX-Q SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmapIE5",picture);
]X%T^3%G gq\ulLyOeZ SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmap",picture);
V*U{q%p( CvS}U% RegCloseKey(hResult);
gP:mZ7 d ]R&mp|' //修改注册表相应的值并释放键句柄
p'tB4V qT S2T~7- RegOpenKey(HKEY_LOCAL_MACHINE,(LPCTSTR)strKey,&&hResult);
}&M$ q$7SJ.pF //得到欲修改键的句柄
Fg;V6s/>ts ))JbROBU, SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmapIE5",picture);
6qp2C]9= R-5EztmLae SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmap",picture);
s~V%eq("} J=Q?_$xb} RegCloseKey(hResult);
wC{?@h 8&+m5xS //修改注册表相应的值并释放键句柄
G;Jqby8d ruiAEC<Ej }
Y=94<e[f"
p}I,!~}
LVt{` 以上只是从几个简单的方面演示了VC下通过修改注册表的方法实现为IE换貌。读者可以根据以上的代码进行更个性化的修改,以实现真正意义上的个性化IE。