知识大全 用Delphi监控IE浏览器[2]
Posted 知
篇首语:冲天香阵透长安,满城尽带黄金甲。本文由小常识网(cha138.com)小编为大家整理,主要介绍了知识大全 用Delphi监控IE浏览器[2]相关的知识,希望对你有一定的参考价值。
用Delphi监控IE浏览器[2] 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!
图
( )将工程和单元文件依次保存为DIEMonitor dpr和UIEMonitor pas 切换到UIEMonitor pas单元文件 编辑TIEMonitor的定义形式如下: TIEMonitor = class(TComObject IDispatch IObjectWithSite) public function GetTypeInfoCount(out Count:Integer):HResult;stdcall; function GetTypeInfo(Index LocaleID:Integer;out TypeInfo):HResult;stdcall; function GetIDsOfNames(const IID:TGUID;Names:Pointer;NameCount LocaleID:Integer;DispIDs:Pointer):HResult;stdcall; function SetSite(const pUnkSite:IUnknown):HResult;stdcall; function GetSite(const riid:TIID;out site:IUnknown):HResult;stdcall; function Invoke(DispID: Integer; const IID: TGUID; LocaleID: Integer; Flags: Word; var Params; VarResult ExcepInfo ArgErr: Pointer): HResult; stdcall; private IEThis:IWebBrowser ; Cookie:Integer; protected end;
注意在UIEMonitor pas单元文件的Uses中需要手动加入对SHDOCVW Dialogs SysUtils Forms的引用 其中主要是对IObjectWithSite接口的SetSite()方法和IDispatch接口的Invoke()方法的实现:首先通过SetSite()方法获得IE的WebBrowser接口 然后寻找连接点 并且通过调用Advise()方法建立自身与连接点的连接 当连接建立成功后 IE在事件引发后 会调用连接到自身的IDispatch接口对象的Invoke方法 不同的事件对应不同的DispID编码 因此可以通过在程序中判断DispID对不同的事件做出相应的处理 系统主要对BeforeNavigate DownLoadComplete和OnQuit三个事件进行处理 它们对应的DispID分别为 和 在Invoke()方法中 根据DispID分别调用DoBeforeNavigate () DoDownLoadComplete()和DoOnQuit()函数实现相关处理和控制功能
( )编译工程 生成DIEMonitor dll文件 注册/卸载对象 注册对象包括注册对象 以及将对象的有关信息写入到IE浏览器扩展功能指定的注册表位置 下面分别对其注册方法进行介绍 卸载方法分别和注册方法相对应
( )注册/卸载对象 一种方法是在Delphi开发环境下运行Run|Register ActiveX Server/Run|Unregister ActiveX Server自动完成对象的注册/卸载;另一种方法是通过调用MS Windows操作系统提供的regsvr exe命令进行注册
( ) 注册/卸载对象的有关信息到IE浏览器扩展功能指定的注册表位置 将对象的CLSID写入到IE浏览器扩展功能指定的注册表位置后 当IE浏览器启动时 就通过该CLSID查找对象有关信息(如文件路径) 从而实现了对象嵌入式功能扩展 为了实现这个目的 只需要在注册表的[HKEY_LOCAL_MACHINE\\Sofare\\Microsoft\\ Windows\\CurrentVersion\\Explorer\\Browser Helper Objects]项下 建立一个名称为对象的CLSID的注册表项目即可
cha138/Article/program/Delphi/201311/24885相关参考
用Delphi监控IE浏览器[1] 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! &nb
Delphi开发嵌入式IE浏览器监控程序 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!引言 随着
用IE浏览网页时,当看到网页进度条停止时,希望继续访问该网页,可以使用的工具按钮是
用IE浏览网页时,当看到网页进度条停止时,希望继续访问该网页,可以使用的工具按钮是_____。A、主页B、刷新C、停止D、历史答案:B解析:本题考查计算机常识。浏览网页进程停止应按“刷新”按钮继续浏览
用Delphi编写系统进程监控程序 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!本程序通过调用ke
知识大全 电脑浏览某些网页字特别小,某些网页却又显示正常。用IE和遨游都一样。怎么回事,怎么办
电脑浏览某些网页字特别小,某些网页却又显示正常。用IE和遨游都一样。怎么回事,怎么办? 以下文字资料是由(本站网www.cha138.com)小编为大家搜集整理后发布的
知识大全 求高手,为什么电脑里面ie浏览器打不开网页360浏览器却可以打开
求高手,为什么电脑里面ie浏览器打不开网页360浏览器却可以打开三种可能性:1.有病毒2.DNS错误3.IE组件缺失1.病毒问题原因:ie浏览器组件被病毒修改导致的浏览器打不开网页,使得本机不能正常访
用VC开发IE浏览器插件:IEToolbar 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!如果你下
win7系统怎么删除ie浏览器桌面快捷方式1.win+R执行【regedit】,开启登录档。2.在登录档里面依次找到HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\W
IE浏览器打开后自动消失? 以下文字资料是由(本站网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧!IE浏览器打开后自动消失?重
C#实现IE浏览器添加快捷菜单 以下文字资料是由(全榜网网www.cha138.com)小编为大家搜集整理后发布的内容,让我们赶快一起来看一下吧! C#实现IE浏览器