北京 邓磊  

   是不是很早就想拥有一个很有个性的浏览器？本文将介绍如何利用MicroSoft的
WebBrowser控件在VC中创建一个属于自己的浏览器。过程如下：

①新建一个基于对话框的工程，命名为test，然后在对话框上单击右键，选择
Insert ActiveX Control…在弹出的对话框中选择MicroSoft Web浏览器，点击OK。
此时对话框上已经出现了WebBrowser控件，调整它的大小以适合对话框的大小。

②选择WebBrowser控件，点击View/ClassWizard，选择Member Variables,单击
Add Variable按钮，此时会弹出两个对话框，均点击确定即可。然后给该控件加
入一个变量，我们把它命名为m_ctrlWeb。

③在ClassWizard中选择OnInitDialog()函数，在里面加入如下代码：

m_ctrlWeb.Navigate("d:\\temp\\html_doc\\
index.html",NULL,NULL,NULL,NULL);

第一个参数即你要浏览的URL地址，可以是一个文件，也可以是一个地址
(如http://dlgis.topcool.net)。

现在编译运行改程序，如何，是不是已经看到你想要浏览的网页了！不过，我们现在
的浏览器只能显示，还没有最基本的前进、后退、刷新等功能，下面我们来加入这些
功能。

④在对话框上加入三个按钮，分别命名为前进(IDC_BUTTON_FORWARD)、后退
(IDC_BUTTON_BACK)、刷新(IDC_BUTTON_REFRESH)，然后我们分别为他们加入控制代
码。首先要控制他们在特定的情况下是否可用，即达到最顶层或最底层时，前进或后
退按钮要相应的改变他们的状态。利用ClassWizard给WebBrowser控件加入
CommandStateChange事件，然后单击Edit Code按钮，在其中加入如下代码：

switch(Command)
{
case 1:
{
   GetDlgItem(IDC_BUTTON_FORWARD)->EnableWindow(Enable);
   break;
}

case 2:
{
   GetDlgItem(IDC_BUTTON_BACK)->EnableWindow(Enable);
   break;
}
}

此时，按钮已经可以随着你点击超连接而改变他们的状态了。下面要加入控制前进后
退的代码以使这些按钮起作用。

⑤分别给前进和后退按钮的函数加入如下代码：

前进：m_ctrlWeb. GoForward();
后退：m_ctrlWeb. GoBack();

⑥给刷新按钮加入如下代码：
m_ctrlWeb.Refresh();

现在，基本的功能基本已经具备了。但有时在开发的过程中，我们不仅仅满足于可以
浏览，我们或许想要对特定的连接进行特殊的处理，这就涉及到如何得到你点击超连
接时，得到该超连接的值的问题。WebBrowser控件的TitleChange事件提供了这样的
功能，下面我们看一下如何得到超连接的内容。

⑦利用ClassWizard给该控件加入TitleChange事件，该函数的Text参数即可以返回你
点击的内容。在我的应用程序中是这样利用的。我的程序中有一个有关地名的数据
库，当TitleChange事件发生时，返回你所点击的地名，然后到数据库中检索该地名，
数据库中存有有关该地名的各种信息，如视频、声音及文本资料等等，检索到之后，
就可以在程序中对这些资料进行显示、播放等操作了。

到现在为止，你已经拥有了一个完全由你自己随心所欲控制的浏览器以及你想要扩充
它的的功能的Idea了。