利用delphi编写ie扩展 - 超想软件

《利用delphi编写ie扩展 - 超想软件》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、利用Delphi编写IE扩展-超想软件利用Delphi编写IE扩展-超想软件关于超想本站导航加入收藏夹邮件列表留言首页

2、本站产品

3、Delphi资料

4、免费资源

5、程序人生

6、软件工程

7、网站设计

8、推荐网站你所在的位置->主页->超想软件->编程资料->delphi->开发技巧->网络通讯->详细【相关内容】在Delphi程序中应用IE浏览器控件【新品推荐】炒股最佳工具机构决策的依据、庄家控盘的轨迹、一手资讯全面跟踪、赢利轨迹全程把握，从现在起你只需一个电话、或且一次访问定会改变您的股海人生！从现在起您能用财富

9、软件计算出庄家在做什么股票，让您从普通散户成为一流操盘手,就这么神奇！财富软件参数引擎的基本原理是什么？答：大家知道，每只股票都有几十种指标的分析方法，而每个指标又有多达上万种的参数组合，如何才能从中找出每只股票的最佳运行轨迹呢，这在任何操盘手来说都是难以想象！而财富大参考正是通过庞大的计算机机群，每天对每支股票的几十种指标的几百万种参数组合进行上亿次的运算，得出每只股票的完整运行轨迹，告诉你真实的个股走势！财富软件的选股和同类软件相比，最大的特点是什么？答：最大的特点是选股数量少、成功率收益率极高、

10、可操作性强、具股票的买入、卖出参考点。财富软件适合初入股市的投资者使用吗？答：财富软件非常适合初入股市的投资者。初入市者对股市缺乏整体的认识，因此往往显得无所适从。大参考提供买入卖出参考点和机构使用的资讯，实际上是所有股民共同的最终目的，操作十分简单。对于初入股市的人更是得心应手。请与我们联系【详细内容】利用Delphi编写IE扩展作者：张泰立评价：上站日期:2001-06-29内容说明：来源：利用Delphi编写IE扩展就是如何使ie扩展组件可以响应事件。在自己的程序中使用过webbrowser控件

11、的朋友都知道，webbrowser控件定义了诸如beforenavigate、downloadcomplete等事件，我们可以通过编写事件处理代码实现对webbrowser控件的操作。那么如何实现对ie的事件响应和处理呢？同建立ie面板一样。我们需要建立一个实现iobjectwithsite接口的com组件，不同的是，我们还需要实现idispatch接口，在iobjectwithsite接口的setsite方法中获得ie的webbrowser接口并建立自身与webbrowser的连接，然后如果在ie的

12、webbrowser对象中发生什么事件的话，那么ie就会回调连接的idispatch接口的invoke方法。我们通过在invoke方法中编写代码就可以获得ie事件了。这个利用的是com编程的回调接口原理。下面我们首先来实现代码。点击delphi菜单file

13、new。在activex页面中选择activelibrary，然后点击ok按钮。然后用同样的方法建立一个comobject。在comobjectwizard窗口中，将复选框includedtypelibrary去掉。然后在classname中输入i

14、ehelper，在implementedinterface中输入：idispatch；iobjectwithsite。然后点击ok按钮建立一个com组件。保存工程，将工程保存为iehelper.dpr，将unit1保存为iehelperunit.pas。下面是iehelperunit.pas的具体代码：unitiehelperunit;interfaceuseswindows,comobj,activex,shdocvw,mshtml,dialogs;typetiehelperfactory=clas

15、s(tcomobjectfactory)privateprocedureaddkeys;procedureremovekeys;publicprocedureupdateregistry(register:boolean);override;end;tiehelper=class(tcomobject,idispatch,iobjectwithsite)publicfunctiongettypeinfocount(outcount:integer):hresult;stdcall;functionge

16、ttypeinfo(index,localeid:integer;outtypeinfo):hresult;stdcall;functiongetidsofnames(constiid:tguid;names:pointer;namecount,localeid:integer;dispids:pointer):hresult;stdcall;functioninvoke(dispid:integer;constiid:tguid;localeid:in