自从微软捆绑了IE以后,网虫们便注定了要永远地面对那一成不变的微软模式:窗口、按钮和
www.microsoft.com网站,从用户的角度,我们希望能够拥有自己特色的IE;从商业运作角度,商人希望无处不有他们公司的宣传信息,希望IE一经运行便可自动进入他们的网站。下面笔者介绍一种用VC6编程,通过修改注册表来改变IE面貌的方法。
CS;bm`8a Iv6(Z>pAB VC修改注册表的方法与函数
L'dR;T[; 注册表是由树干和键组成的,对注册表的修改便是对键的修改。
9sQ4
$ 首先,要对键修改需先得到要修改键的句柄,VC中为键打开一个句柄,可采用的函数为LONG RegOpenKey命令;然后才能对键进行修改,用SetRegValue命令;最后需要释放得到的键句柄,用RegCloseKey(hResult)命令。
5]/i[T_ n+db#qAj5 通过修改注册表实现IE换貌
,O[HX?> 我们都知道,在注册表中,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()
>4gGb) `K.2&6xc {
/8\gT(@ A4lh`n5% if(AddressNum==0){
uqaP\ j'#Y$d1. AfxMessageBox("没有可应用的选项!");
E2 M|b vf=b5s(7Q return;
7!0~sf9A 5&WYL }
={[s)G |!VSed#FSn CString address;
1+1Z]!nG#! oMH-mG7:K int sel=m_address1.GetCurSel();
[89qg+z *.X!AJ;M=O if(LB_ERR ==sel){
otQulL)T/ `Pa)H AfxMessageBox("请先选中要应用的选项!");
PNwXZ/N% dg9
DBn# return;
V)
#vvnq ZJCD)?]=3 }
\ W3\P= |D `r o m_address1.GetText(sel,address);
86bl'FdKS )Mw<e //取得所需加入的网址字符串
@D<q=:k %UEV['= CString strKey="Software\\Microsoft\\Internet Explorer\\Main";
\`:X37n)0q e;1n!_l\ HKEY hResult;
.VFa,&5;3 [D[&aA RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
XUf]gQu3= 6\MH2&L< //得到欲修改键的句柄
=|lw~CW k 7 !{p SetRegValue(HKEY_CURRENT_USER,strKey,"Start Page",address);
Gw3H1:yo ,2H@xji
[ RegCloseKey(hResult);
. zM rQ0V3x1"Qx //修改注册表相应的值并释放键句柄
b2x8t7%O
de.!~%D }
9$-V/7@) e0i&?m 2.给工具条指定用户特定的背景图案
+b<q4W vWbf5? void CJhfDlg::OnAddBackGround()
ES~ykE .8[Db1W {
bERYC| <S*o}:iB if(PictureNum==0){
iqCZIahf obUX7N AfxMessageBox("没有可应用的选项!");
3*13XQ Jh3(5d"MV return;
F8(6P1}E -p|@En n }
nl9G1Sm(E =d#3& R]p CString picture;
~(2G7x)
-rYOx9P4 int sel=m_PicList.GetCurSel();
iV8j(HV -5 -X[`cF if(LB_ERR ==sel){
xngK_n t/?x#X AfxMessageBox("请先选中要应用的选项!");
Y<X,(\iEHP q4)8]Y2 return;
Y{]RhRR 'Wv=mBEfZ }
&lg+uK $<jI<vD+: m_PicList.GetText(sel,picture);
,(0q =;(w Bj //取得所需加入背景图案文件路径
!(=bH"P \M4/?<g CString strKey="Software\\Microsoft\\Internet Explorer\\Toolbar";
vO#4$, D'y/pv}! HKEY hResult;
`&2AN%Xz ?(Dk{-:T' RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
ejYJOTT{^ [ Fid //得到欲修改键的句柄
;IX3w:Aw @}&o(q1M0 SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmapIE5",picture);
g0@i[&A@{ Fwn4c4-% SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmap",picture);
#`P4s>IL1 /`yb75 RegCloseKey(hResult);
m
S[Vl6 wTBp=)1)f //修改注册表相应的值并释放键句柄
MW%EJT>@z
- P+( =U RegOpenKey(HKEY_LOCAL_MACHINE,(LPCTSTR)strKey,&&hResult);
$N[-ks2{@ S5R Q //得到欲修改键的句柄
'\ec ,&4Z ;kO
Op@e SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmapIE5",picture);
yE3g0@* oWGtKtDhH SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmap",picture);
.%>UA|[~: LO8V*H( RegCloseKey(hResult);
X^4HYm >U @7xeK //修改注册表相应的值并释放键句柄
A-:58Qau+ P@LYa_UFsN }
4}sfJ0HhX y~_wr}.CS @$ E&H`da 以上只是从几个简单的方面演示了VC下通过修改注册表的方法实现为IE换貌。读者可以根据以上的代码进行更个性化的修改,以实现真正意义上的个性化IE。