Delphi WebBrowser控件的使用 WebBrowser控件属性:1.Application      如果该对象有效,则返回掌管WebBrowser控件的应用程序实现的自动化对象(IDispatch).如果在宿主对象中自动化对象无效,程序将返回WebBrowser控件的自动化对象2.Parent       返回WebBrowser控件的父自动化对象,通常是一个容器,例如是宿主或IE窗口3.Containe       返回WebBrowser控件容器的自动化对象.通常该值与Pare…

Delphi 3开始有了TWebBrowser构件,不过那时是以ActiveX控件的形式出现的,而且需要自己引入,在其后的4.0和5.0中,它就在封装好shdocvw.dll之后作为Internet构件组之一出现在构件面板上了.常常听到有人骂Delphi的帮助做得极差,这次的TWebBrowser又是Microsoft的东东,自然 这里有平时我自己用TWebBrowser做程序的一些心得和上网收集到的部分例子和资料,整理了一下,希望能给有兴趣用TWebBrowser编程的朋友带来些帮助.----…

How to make TWebBrowser get focus in Delphi   Written by Administrator       Tags: Delphi Twebbrowser Since TWebBrowser is inherited methods from TControl, you may think immediately to use the method 'SetFocus' to make it get the focus. Unfortunately…

http://www.cnblogs.com/weii 苹果系统,很详细http://blog.sina.com.cn/s/articlelist_1157240623_0_1.html 红鱼,资料很多http://www.cnblogs.com/del/category/323943.html 万一的49篇博客blog.csdn.net/DelphiTeacher OrangeUI的作者,侧重于IOShttp://www.cnblogs.com/CookBlack/category/47993…

delphi 从TWebBrowser WebBrowser得到全部html源码 http://blog.csdn.net/webouse/article/details/3912174   网上查询出很多方法,归结起来有两种 1.使用IPersistStreamInit接口实现,函数名都是function GetHtml(const WebBrowser: TWebBrowser) : string;这个函数确实可以得到全部的html源码,但是里面用到了hHTMLText := GlobalA…

版本:DELPHI XE8 操作交通银行信用卡申请表单(2016-03-23),网址如下: https://creditcardapp.bankcomm.com/applynew/front/apply/new/identity.html 本次操作的难点是“省份”与“城市”这两个<select>标签,当选择了“省份”时,“城市”会自动变更. 但,用普通的方法去改变“省份”的值,不能触发“城市”自动更新事件. 经过尝试,发现用JQUERY脚本可以达到效果.代码如下: var BDoc: IHTM…

主要扩展了3D界面.右键菜单.是否显示图片.是否支持JAVA等功能. 代码如下: unit ExtWebBrowser; interface uses Windows, SysUtils, Classes, Controls, OleCtrls, SHDocVw, ActiveX, Forms, URLMon; type TDocHostUIInfo = packed record cbSize : ULONG; dwFlags : DWORD; dwDoubleClick : DWORD; p…

当TWebBrowser控件访问的 Web 页上的脚本调用window.close方法时,TWebBrowser控件可能会在窗体中消失.我们的程序应该对此作出反应,否则再次访问TWebBrowser控件将引发异常.当TWebBrowser控件销毁前会向其父窗口(即我们的程序窗体)发送WM_PARENTNOTIFY消息,消息的wParam参数的低字部分为:WM_DESTROY,lParam参数为TWebBrowser控件的窗口句柄.我们可以响应该消息处理TWebBrowser的Close事件,代码…

最近帮朋友做一个软件,其中要自动化某网页中的操作,最简的操作是调用自己写的代码. 代码如下: procedure TForm1.Button2Click(Sender: TObject);var  i:integer;  h:IHTMLHeaderElement;  o:OleVariant;begin  o:=webbrowser1.OleObject.document.createElement('script');  o.type:='text/javascript';  o.text:=…

Delphi WebBrowser控件的使用中出现的bug:  1.WebBrowser.Visible=false:Visible属性不能使WebBrowser控件不可见,暂时用 WebBrowser.Hide的方法代替,WebBrowser.Hide隐藏浏览器, WebBrowser.Show显示浏览器:    补充:WebBrowser的OnVisible事件 控制窗口的可见或隐藏,用法同上(经测试Visual属性改变时不会激发)    上述补充参考原网址:   http://www.tu…