电脑桌面
添加小米粒文库到电脑桌面
安装后可以在桌面快捷访问

delphi中Webbrowser的使用技巧

delphi中Webbrowser的使用技巧_第1页
1/24
delphi中Webbrowser的使用技巧_第2页
2/24
delphi中Webbrowser的使用技巧_第3页
3/24
WebBrow ser 组件和MSHTML 在Delphi中的使用 由于项目需要,近来研究了一下WebBrowser组件和MSHTML 在Delphi中的使用,整理了一下这段时间研究的结果,写下来一是方便大家查阅,二也可以加深我自己的记忆.希望能对大家有所帮助„ „,同时,如果有更好的处理方式或者我没有提到的问题,请大家也告诉我哦, 咱们一块进步„ ...,其中一部分是我从网络中搜集的资料,谢谢那些兄弟们„ „ MSHTML把HTML页面中的元素封装成了IHTMLInputElement、 IHTMLInputButtonElement、IHTMLInputTextElement、IHTMLTextAreaElement、IHTMLTitleElement、IHTMLFormElement等等组件接口。 在程序中可以通过 MSHTML提供的IHTMLDocument2接口得到整个 Document对象,IHTMLElementCollection接口得到所有页面元素的集合,通过该接口的Item方法可以得到具体的某个组件,然后设置和读取该组件的属性值。 下面是一些常用功能的事例代码. 1. 打开某个页面: web.Navigate(ExtractFilePath(Application.ExeName) + 'Template/login.html'); 2. 取出页面中某个 HtmlElement的Value属性值: function GetValueByElementName(web: TWebBrowser; elementName: string; index: integer): string; begin result := (((web.Document as IHTMLDocument2).body.all as IHTMLElementCollection).item(elementName, index) as IHTMLInputElement ).value end; 3. 给HtmlElement设置 Value属性 procedure SetValueTextAreaName(web: TWebBrowser; elementName, value: string;index: integer); begin (((web.Document as IHTMLDocument2).body.all as IHTMLElementCollection).item(elementName, index) as IHTMLTextAreaElement ).value := value; end; 4. 判断页面执行结果是否成功 因为Web应用中如果出错的一般是采用错误页面的方式呈现给最终用户,所以我们也无 法抓到Http错误,只 能通过在webBeforeNavigate2事件中将 URL参 数 记录 到全 局 变 量 中, 然后在webDocumentComplete事件中根 据 URL参 数 和全 局 变 量 中的URL参 数 来判断执行结果是否正 确 .当 然,这样 需要将 页面地 址 编 码到代码中,降 低 了灵 活 性,但 是这也是我能想 到的唯 一的方法,如果大家有什 么 好的方法,请告诉我哦. 5. 屏 蔽 鼠 标 右 键 和某些快 捷 键 本 功能需要在webBrowser...

1、当您付费下载文档后,您只拥有了使用权限,并不意味着购买了版权,文档只能用于自身使用,不得用于其他商业用途(如 [转卖]进行直接盈利或[编辑后售卖]进行间接盈利)。
2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。
3、如文档内容存在违规,或者侵犯商业秘密、侵犯著作权等,请点击“违规举报”。

碎片内容

delphi中Webbrowser的使用技巧

确认删除?
VIP
微信客服
  • 扫码咨询
会员Q群
  • 会员专属群点击这里加入QQ群
客服邮箱
回到顶部