自从微软捆绑了IE以后,网虫们便注定了要永远地面对那一成不变的微软模式:窗口、按钮和
www.microsoft.com网站,从用户的角度,我们希望能够拥有自己特色的IE;从商业运作角度,商人希望无处不有他们公司的宣传信息,希望IE一经运行便可自动进入他们的网站。下面笔者介绍一种用VC6编程,通过修改注册表来改变IE面貌的方法。
}Z\+Qc<< c>Ljv('bj VC修改注册表的方法与函数
q}5&B=2pM 注册表是由树干和键组成的,对注册表的修改便是对键的修改。
Q&9& )8- 首先,要对键修改需先得到要修改键的句柄,VC中为键打开一个句柄,可采用的函数为LONG RegOpenKey命令;然后才能对键进行修改,用SetRegValue命令;最后需要释放得到的键句柄,用RegCloseKey(hResult)命令。
bRAf!<3 Eb9M;u 通过修改注册表实现IE换貌
j8p'B-yS 我们都知道,在注册表中,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()
z9KsSlS ^ Va'K~$d_ {
FkT% -I Xq%!(YD| if(AddressNum==0){
{EupB? /h%MWCZWm^ AfxMessageBox("没有可应用的选项!");
8 _[f#s`) h-h}NCP return;
z'X_s.9F 1')/ BM2 }
**O4"+Xi8 Wkv**X} CString address;
`P4qEsZE>` )O%lh
8fI int sel=m_address1.GetCurSel();
*)d|:q3 UoxF00H@! if(LB_ERR ==sel){
Q-&]Vg Qi7^z; AfxMessageBox("请先选中要应用的选项!");
(;h]'I@ Dl/_jM return;
?-'Q-\j :<IW' }
V2]S{!p}k 7\U1K^q m_address1.GetText(sel,address);
^NLKX5Q LDvF)Eg //取得所需加入的网址字符串
?\F ,}e AQ
7e CString strKey="Software\\Microsoft\\Internet Explorer\\Main";
2i(|? XJ^ Nd!2 @?V4 HKEY hResult;
7RD` *s NV-9C$<n2! RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
Ef `LBAfOO PewPl0 //得到欲修改键的句柄
JkxS1 khv! \^&DD SetRegValue(HKEY_CURRENT_USER,strKey,"Start Page",address);
X0Oq lAw EShakV RegCloseKey(hResult);
M*S5&xpX 56_KB.Ww~ //修改注册表相应的值并释放键句柄
{M~!?#<K /l$noaskX }
}lb.3fqiA ^:)&KV8D| 2.给工具条指定用户特定的背景图案
VDmd+bvJV ^&rbI,D void CJhfDlg::OnAddBackGround()
+li^0+3-' =W|Q0|U {
!yI)3;$* "DN `@ if(PictureNum==0){
KnFbRhu[ BVNh>^W5B AfxMessageBox("没有可应用的选项!");
#dfW1@m !aEp88u return;
jw[`_ 9,c>H6R7 }
,`7GI*Vq 4#YklVm CString picture;
K/,lw~> 0Yjy int sel=m_PicList.GetCurSel();
|5/[0V-vy Bm7GU`j" if(LB_ERR ==sel){
-/qrEKQ0U? 3U`.:w` AfxMessageBox("请先选中要应用的选项!");
HY:@=%R C/Z"W@7#; return;
4>E2G: awK'XFk }
,'673PR )AoFd> m_PicList.GetText(sel,picture);
%dU}GYL_ o|W? a#_\ //取得所需加入背景图案文件路径
7| T:TbY> aS7zG2R4H CString strKey="Software\\Microsoft\\Internet Explorer\\Toolbar";
`+o.w#cl 1m)/_y~1
k HKEY hResult;
u@EM,o @ih}x RegOpenKey(HKEY_CURRENT_USER,(LPCTSTR)strKey,&&hResult);
xVyUUzXs %ze1ZWO{ //得到欲修改键的句柄
.'1j5Y-l`N j5O*H_D SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmapIE5",picture);
jb2:O,+! -DnK)u\@ SetRegValue(HKEY_CURRENT_USER,strKey,"BackBitmap",picture);
h<.[U
$, <.B s`P RegCloseKey(hResult);
S8RB0^Q7 ]EnaZWyO] //修改注册表相应的值并释放键句柄
5!zvoX9 z{d5Lrk RegOpenKey(HKEY_LOCAL_MACHINE,(LPCTSTR)strKey,&&hResult);
's?F ip =R.9"7~2x //得到欲修改键的句柄
U;GoC$b}| }A7qIys$4 SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmapIE5",picture);
,9qB}HG m4wTg
8LJ SetRegValue(HKEY_LOCAL_MACHINE,strKey,"BackBitmap",picture);
^BX@0"&- '>Y
2lqa RegCloseKey(hResult);
m[j3s=Gr q4iD59yd)S //修改注册表相应的值并释放键句柄
bl?%:qb.V #L0I+ K,K\ }
L"I] mQvd B7MW" y n;-r
W;ZO 以上只是从几个简单的方面演示了VC下通过修改注册表的方法实现为IE换貌。读者可以根据以上的代码进行更个性化的修改,以实现真正意义上的个性化IE。