自从微软捆绑了IE以后,网虫们便注定了要永远地面对那一成不变的微软模式:窗口、按钮和
www.microsoft.com网站,从用户的角度,我们希望能够拥有自己特色的IE;从商业运作角度,商人希望无处不有他们公司的宣传信息,希望IE一经运行便可自动进入他们的网站。下面笔者介绍一种用VC6编程,通过修改注册表来改变IE面貌的方法。
S/)P&V% 2apR7 VC修改注册表的方法与函数
p9Zi}!
注册表是由树干和键组成的,对注册表的修改便是对键的修改。
z&[Rw<{Psb 首先,要对键修改需先得到要修改键的句柄,VC中为键打开一个句柄,可采用的函数为LONG RegOpenKey命令;然后才能对键进行修改,用SetRegValue命令;最后需要释放得到的键句柄,用RegCloseKey(hResult)命令。
dO}6zQ\ M_*"g>Z 通过修改注册表实现IE换貌
_0ki19rs 我们都知道,在注册表中,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()
Z
.VIb| p/L|;c {
?U.+SQ G#-t&gO3 if(AddressNum==0){
}Tf~)x A@xa$!4} AfxMessageBox("没有可应用的选项!");
;`',M6g <dl:';@a- return;
6r{NW9y' ;rZR9fR }
OjTb2[Q |l)SX\Qf`@ CString address;
L#mf[a@pCn HZC^Q7]hy int sel=m_address1.GetCurSel();
~``oKiPg@ +U{8Mj if(LB_ERR ==sel){
;"46H'>! $Y* d ' > AfxMessageBox("请先选中要应用的选项!");
?aOx
b ekC
1wN
l return;
AL@8v= QG
{KEj2V }
\Fg%V> dPZrX{ c m_address1.GetText(sel,address);
%0l'Nuz [AkL6 //取得所需加入的网址字符串
KGb:NQ=O6i .Qk T-12 CString strKey="Software\\Microsoft\\Internet Explorer\\Main";
))m\d * RQhS]y@e HKEY hResult;
=p~k5k4 XE8>&&X RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
T1AD(r\W5 TLbnG$VQS //得到欲修改键的句柄
o;5 J= [y$P'Y SetRegValue(HKEY_CURRENT_USER,strKey,"Start Page",address);
|8^53*f ? 2GeJ\1k RegCloseKey(hResult);
art
L LkYcAY$w //修改注册表相应的值并释放键句柄
Nki08qZ[ D! TFb E }
ramYSX@ ]S!:p>R 2.给工具条指定用户特定的背景图案
M ,!Dhuas 7L3:d7=MIW void CJhfDlg::OnAddBackGround()
%L(;}sJ. lz1RAp0R" {
mQ(6ahD U ,F}\njL
if(PictureNum==0){
tDw(k[aK@ z OwKh>] AfxMessageBox("没有可应用的选项!");
-;]m4R)z V$wW?+V return;
LF6PKS CVUA7eG+ }
]mIcK 8i$quHd&x CString picture;
k*XI/k5Vc Z*uv~0a>9Q int sel=m_PicList.GetCurSel();
I_hus Z[9)
hGh if(LB_ERR ==sel){
_yx~t 2IMU & AfxMessageBox("请先选中要应用的选项!");
3s%Kw,z h&5bMW return;
Hwb+@'o ctg U }
_A]8l52pt 7Yv1et
| m_PicList.GetText(sel,picture);
rgq~lZ.U4K Qc4r?7S< //取得所需加入背景图案文件路径
]'IZ bx: bsClw CString strKey="Software\\Microsoft\\Internet Explorer\\Toolbar";
287g 5 *LuR
<