Delphi程序如何引用和使用IE浏览器控件

以下是网学网为您推荐的DELPHI-Delphi程序如何引用和使用IE浏览器控件，希望本篇文章对您学习有所帮助。

 

　　大家还记得Delphi的范例程序中的那个浏览器的例子吧。在那个例子中，利用控件THttp的属性和方法制作了一个浏览器。该例子用于理解THttp控件的使用方法，确实不错。但很少有人会用它作为一个真正的浏览器，原因很简单，功能太有限了，不支持Frame，不支持Script脚本语言，不能以本地文件方式查看HTML文件等等。大部分用户在使用Internet Explorer或Netscape Navigator；我们程序员也乐意使用现成的浏览器，在需要使用浏览器时，就在程序中通过WinExec或CreateProcess等方法调用外部浏览器让用户使用。这种方法确实挺省事的，但总让笔者有点不甘心，把程序控制权让给其它外部程序总让自己很感到麻烦，尤其当应用软件的使用者的计算机使用水平不是很高时。如果能有一个浏览器控件，就可把浏览器嵌入到自己的程序中，那应该挺不错的。　　如果你的软件的外部环境是WIN95 IE或WIN98(这样的软件使用率还很高的)，那样在系统中就已经有了一个IE浏览器控件可以使用了，也许是你长时间没有发觉吧，别浪费资源了，拿来使用吧。当系统中已经安装了IE3.X或IE4.X时，IE浏览器控件已经注册到系统中了，请运行Regedit，用“编辑”菜单下的“查找”功能，查找“Shell.Explorer”键名，你会发现IE控件已经作为ActiveX控件注册在系统中了，这样就我们可以在Delphi中使用该控件了。 一、 在Delphi中引入IE浏览器控件 　　由于IE浏览器控件需要提供显示功能才能使用，所以不能在程序中用CreateOleObject取得一个实例后直接使用其属性和方法，否则程序在运行时会引起错误；这时需要用Delphi中提供的“Import ActiveX Control”功能，操作方法见下所述。　　在“Components”菜单中，调用“Import ActiveX Control”功能，在Registered Controls(注册控件)列表中选择“Microsoft Internet Controls(Version1.1)”，下方的提示栏中显示出其路径为C:PWin98SystemSHDOCVW.DLL，在Class Names(类型列表)中列出了可注册的三个控件：TWebBrowser_V1、TWebBrowser和TShellFolderViewOC，分别为IE3浏览器控件、IE4浏览器控件和“Microsoft外壳文件夹查看路由器”控件。单击Install进行安装。安装完成后，在“ActiveX”控件栏中，将增加三个控件，分别为TWebBrowser_V1、TWebBrowser和TShellFolderViewOC；在Delphi的Imports目录下，将创建一个文件SHDocVw_TLB.PAS，其中有这三个控件的包装细节，当然含控件的属性和方法说明了，它可以作为我们使用控件的参考资料。 二、 在Delphi程序中使用IE浏览器控件 以TWebBrowser(IE4浏览器控件)为例子。TWebBrowser的常见属性和方法主要有：GoBack：方法，后退到上一个页面。GoForward：方法，前进到下一个页面。GoHome：方法，调用默认的主页页面，该页面在IE的选项中设定。GoSearch：方法，调用默认的搜索页面，该页面在IE的选项中设定。Navigate(const URL: WideString; var Flags, TargetFrameName, PostData,Headers: OleVariant)：方法，调用指定页面，具体参数如下：URL：指定页面的URL。 Flags：Word类型，作用还不清楚，可设为0。TargetFrameName：WideString，打开页面所在的Frame，为空字符串时在当前的Frame中打开；TargetFrameName指定的Frame存在时在Frame中打开；TargetFrameName指定的Frame不存在时则新建一个窗口打开，此时就相当于调用外部的IE浏览器了。PostData：boolean，是否允许发送数据。Headers：WideString，要发送的URL请求的头部数据。Refresh：方法，刷新当前页面。Stop：方法，停止调用或打开当前页面。LocationName：属性(WideString)，当前位置的名称。Loc