Delphi Web - 随笔分类 - 滔Roy

Delphi 动态打开网页/网址的几种方式

摘要：Delphi 动态打开网页/网址的几种方式 1、使用TWebBrowser uses OleCtrls, SHDocVw; var WB:TWebBrowser; begin WB:=TWebBrowser.Create(Self); Self.InsertControl(WB); // 将WB作为阅读全文

posted @ 2022-03-04 09:29 滔Roy 阅读(1334) 评论(0) 推荐(0) 编辑

Delphi WebBrowser[13] 网页中插入自定义JavaScript

摘要：Delphi WebBrowser[13] 网页中插入自定义JavaScript var i:integer; h:IHTMLHeaderElement; o:OleVariant; begin o:=webbrowser1.OleObject.document.createElement('scr 阅读全文

posted @ 2020-11-24 08:46 滔Roy 阅读(423) 评论(0) 推荐(0) 编辑

Delphi 通过URL地址获取网页源码的方法

摘要：Delphi 通过URL地址获取网页源码的方法 uses WinInet, Classes, Windows; function UrlGetStr(const URL: string; ShowHeaders: boolean = false): string; const Agent = 'In 阅读全文

posted @ 2020-11-23 11:05 滔Roy 阅读(1029) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[12] 操作Alert对话框（禁用、获取）

摘要：Delphi TWebBrowser[12] 操作Alert对话框（禁用、获取） 1、禁用方法： //常规方法 procedure TForm1.WebBrowser1DocumentComplete(Sender: TObject; const pDisp: IDispatch; var URL: 阅读全文

posted @ 2020-11-23 10:38 滔Roy 阅读(313) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[11] 读写html代码

摘要：Delphi TWebBrowser[11] 读写html代码注意：html 是UTF-8编码的在中文环境下需要转换成GB2312，否则会显示中文乱码 uses ActiveX; function WB_ReadHTML(aBrowser: TWebBrowser): String; begin 阅读全文

posted @ 2020-11-23 10:07 滔Roy 阅读(381) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[10] 防止弹出新窗口的几个方法

摘要：Delphi TWebBrowser[10] 防止弹出新窗口的几个方法 1、方法1 uses MsHTML; WebBrowser1.Silent:=True; //可以防止弹出“语法错误”的窗口。 procedure TForm1.WebBrowser1NewWindow2(ASender: TO 阅读全文

posted @ 2020-11-23 09:55 滔Roy 阅读(651) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[9] 事件Close捕获来防止异常、禁用鼠标右键、回车Enter等键的响应方法

摘要：Delphi TWebBrowser[9] 事件Close捕获来防止异常以及禁用鼠标右键方法 1、事件Close捕获原因：使用TWebBrowser，如果访问的网页有关闭窗口的JavaScript，那么TWebBrowser会被注销，而应用程序本身并没有关闭， 1）在窗体上放置一个TAppli 阅读全文

posted @ 2020-11-23 09:40 滔Roy 阅读(311) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[8] 访问网页中的表格

摘要：Delphi TWebBrowser[8] 访问网页中的表格 use MSHTML; function GetHtmlTableCell(aTable: IHTMLTable; aRow, aCol: Integer): IHTMLElement; var Row: IHTMLTableRow; b 阅读全文

posted @ 2020-11-23 09:34 滔Roy 阅读(287) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[7] 获取网页图片（静态和动态）

摘要：Delphi TWebBrowser[7] 获取网页图片（静态和动态） 1、静态图常用方法： uses WinInet function GetLocalFileNameFromIECache(url:string; var LocalFileName:string):DWORD; var D: C 阅读全文

posted @ 2020-11-23 09:08 滔Roy 阅读(411) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[6] 获取网页所有链接（元素）、下拉菜单及GetElementByID返回值的有效性判定方法

摘要：Delphi TWebBrowser[6] 获取网页所有链接（元素）、下拉菜单及GetElementByID返回值的有效性判定方法 1、获取网页所有链接 var elem: IHTMLElement; coll: IHTMLElementCollection; i: integer; url, ti 阅读全文

posted @ 2020-11-23 09:05 滔Roy 阅读(446) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[5] 获取含框架的网页完整html源码及多个框架（跨域）的方法

摘要：Delphi TWebBrowser[5] 获取含框架的网页完整html源码及多个框架（跨域）的方法 1、获取html源码的常规方法： (WebBrowser1.Document as IHtmlDocument2).body.outerHtml; 2、获取含框架frame的完整html源码（<b 阅读全文

posted @ 2020-11-23 08:53 滔Roy 阅读(666) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[4] 页面复制和粘贴 ctrl+c ctrl+V 无效果的处理

摘要：Delphi TWebBrowser[4] 页面复制和粘贴 ctrl+c ctrl+V 无效果的处理解决方法（初始化和终止）： //在程序后面加入 uses Activex; Initialization OleInitialize(nil); Finalization try OleUninit 阅读全文

posted @ 2020-11-20 19:54 滔Roy 阅读(336) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[3] IE收藏夹操作

摘要：Delphi TWebBrowser[3] IE收藏夹操作 1、添加到收藏夹 const CLSID_ShellUIHelper: TGUID = '{64AB4BB7-111E-11D1-8F79-00C04FC2FBE1}'; procedure AddFavorite(Webbrowser:T 阅读全文

posted @ 2020-11-19 14:32 滔Roy 阅读(165) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[2]-属性、方法、事件示例详解

摘要：Delphi TWebBrowser[2]-属性、方法、事件示例详解 1、属性（1）AddressBar //设置是否显示地址栏，在TWebBrowser中没有用。语法：property AddressBar:WordBool; （2）Busy //确定Web浏览器组件是否正在导航到一个新的URL 阅读全文

posted @ 2020-11-18 11:43 滔Roy 阅读(783) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser[1]介绍

摘要：Delphi TWebBrowser[1]介绍 1、简介 TWebBrowser组件是一个浏览器组件（基于IE内核），可以显示一个指定地址的网页、设置网页打开时的主页以及对网页进行相关的操作，同时也可以对HTML文件进行剪切、复制、粘贴、删除等操作。该组件在Internet组件页中，属于TWebb 阅读全文

posted @ 2020-11-17 14:23 滔Roy 阅读(602) 评论(0) 推荐(0) 编辑

Delphi XE 安卓Web开发错误：net::ERR_CLEARTEXT_NOT_PERMITTED

摘要：Delphi XE 安卓Web开发错误：net::ERR_CLEARTEXT_NOT_PERMITTED 解决方法： 1、确保已经申明权限（AndroidManifest.xml 文件） <uses-permission android:name="android.permission.INTER 阅读全文

posted @ 2020-07-16 09:46 滔Roy 阅读(1094) 评论(0) 推荐(0) 编辑

Delphi TWebBrowser 内核版本修改

摘要：Delphi TWebBrowser 内核版本修改 WebBrowser的默认内核是IE的改变内核版本的操作： 1、在开始菜单内输入“regedit.exe”，进入注册表编辑器 2、找到注册表项：HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Internet Expl 阅读全文

posted @ 2020-03-03 10:25 滔Roy 阅读(1056) 评论(0) 推荐(0) 编辑

Delphi 访问https /SSL、OpenSSL

摘要：访问 Web 网站，最简单用法直接使用 TIdHTTP 控件：例如：AA := IdHTTP1.Get('www.baidu.com.'); 访问 https 的网站，需要 SSL 库。在 Windows 下，去 https://indy.fulgan.com/SSL/ 下载最新的 SSL 的库阅读全文

posted @ 2019-12-03 14:41 滔Roy 阅读(5637) 评论(0) 推荐(1) 编辑

Delphi UTF/URL编码/解码 UTF8Encode、UTF8Decode、URLEncode、URLDecode

摘要：Delphi UTF/URL编码/解码 UTF8Encode、UTF8Decode、URLEncode、URLDecode 一、URL简介 URL是网页的地址，比如 http://www.cnblogs.com。Web 浏览器通过 URL 从 web 服务器请求页面。由于URL字符串常常会包含非A 阅读全文

posted @ 2019-12-03 11:10 滔Roy 阅读(5967) 评论(0) 推荐(0) 编辑

滔 Roy

随笔分类 - Delphi Web