自从微软捆绑了IE以后,网虫们便注定了要永远地面对那一成不变的微软模式:窗口、按钮和
www.microsoft.com网站,从用户的角度,我们希望能够拥有自己特色的IE;从商业运作角度,商人希望无处不有他们公司的宣传信息,希望IE一经运行便可自动进入他们的网站。下面笔者介绍一种用VC6编程,通过修改注册表来改变IE面貌的方法。
4Z[V uQng /8@m<CW2Y VC修改注册表的方法与函数
4^6.~6a 注册表是由树干和键组成的,对注册表的修改便是对键的修改。
7dihVvL
$ 首先,要对键修改需先得到要修改键的句柄,VC中为键打开一个句柄,可采用的函数为LONG RegOpenKey命令;然后才能对键进行修改,用SetRegValue命令;最后需要释放得到的键句柄,用RegCloseKey(hResult)命令。
Q bhW!9(, H* !EP 通过修改注册表实现IE换貌
%/kyT%1 我们都知道,在注册表中,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()
G;gJNK"e 4
;Qlu {
A5#y?Aq v"+k~:t* if(AddressNum==0){
XwM611 ujW1+Oj=~ AfxMessageBox("没有可应用的选项!");
fpM#XFj o/[ return;
o6"*4P| +.[\g|G }
_9:@Vl]Q@ xChI,~i CString address;
`,wu}F85 PXP`ZLF int sel=m_address1.GetCurSel();
')+0nPV h%d^Gq~ if(LB_ERR ==sel){
&O[s: Fb2%!0i AfxMessageBox("请先选中要应用的选项!");
_RMQy~&b ~
aZedQc return;
j-]&'-h}# QzGV.Mt2 }
JM0I(% Z% kfC0zd+ m_address1.GetText(sel,address);
>KGE-Yzj B1N)9% //取得所需加入的网址字符串
G,&%VQ3P> EruP CString strKey="Software\\Microsoft\\Internet Explorer\\Main";
_BnTv$.P E]^5I3=O HKEY hResult;
/I&wj^ F-n"^.7 RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
e^).W3SK] Z+s%;f; //得到欲修改键的句柄
crA:I"I QhGXBM SetRegValue(HKEY_CURRENT_USER,strKey,"Start Page",address);
`ia %)@ )"@t6. RegCloseKey(hResult);
y_F}s9wj ?4PQQd //修改注册表相应的值并释放键句柄
eN0P9.eqM _X5_ez^/= }
M%Ku5X6:/ 5''*UFIF1 2.给工具条指定用户特定的背景图案
{ }e^eJ Y{Ap80'\6 void CJhfDlg::OnAddBackGround()
QHf$f@bjI /<)-q-W; {
n1(?|aJ#1 (VHND%7P if(PictureNum==0){
;##]G=% D>ai.T%n AfxMessageBox("没有可应用的选项!");
g: %9jf "#^MUQ!a return;
O]u",J5 7r{qJ7$% }
RcY[rnI6 T)u4S[
& CString picture;
s(@h 2:j wV<7pi int sel=m_PicList.GetCurSel();
&R$Q\, kv|,b if(LB_ERR ==sel){
-$Y8!5 4 ^,s?e.u$8` AfxMessageBox("请先选中要应用的选项!");
g%J./F=@3 V:
p)m&y6 return;
gqiXmMm:9 B5=3r1Ly }
ryD%i"g< 0TE@xqW m_PicList.GetText(sel,picture);
1/j$I~B euRss#; //取得所需加入背景图案文件路径
/MMtTB
H DMgBcP CString strKey="Software\\Microsoft\\Internet Explorer\\Toolbar";
Hw_o
w? ^^LjI HKEY hResult;
?_4^le[; :F|\Ij0T RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
M$#sc`4* =DgCC|p //得到欲修改键的句柄
\d68-JS@~ E1q%gi4 Q% SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmapIE5",picture);
MZm'npRf k0K A ~ SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmap",picture);
744=3v 9{J?HFw*; RegCloseKey(hResult);
w$Ux?y-L mX_)b>iW //修改注册表相应的值并释放键句柄
1 tfYsg=O Ygj6(2 RegOpenKey(HKEY_LOCAL_MACHINE,(LPCTSTR)strKey,&&hResult);
#a}N"*P )q+4k m6 //得到欲修改键的句柄
AqYxWk3> DnyYMe!r SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmapIE5",picture);
`q?RF+ ~
l )t|'6 SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmap",picture);
*re 44 7c1+t_ Ew RegCloseKey(hResult);
8GB]95JWwp G\rj?% //修改注册表相应的值并释放键句柄
rZC3\,W ;w6s<a@Zh }
uCUu!Vfeg c8Pb jPwef##~7 以上只是从几个简单的方面演示了VC下通过修改注册表的方法实现为IE换貌。读者可以根据以上的代码进行更个性化的修改,以实现真正意义上的个性化IE。