WebBrowser秘笈之属性、方法、事件

合集下载

webbrowser中的点击

webbrowser 中的点击事件、写入值、获取值通常我们在项目开发中，有winfrom 项目需要通过webbrowser 加载网页，并且执行一些小小的操作。

在这里有几种根据 id 、tagname 、class 、name 来点击的代码段：1、根据已知的id 执行点击事件：1 2 3 HtmlElementhte = webBrowser1.Document.GetElementById("label_id"); if (hte != null)hte.InvokeMember("click"); // 激活html 元素的 click 成员2、根据已知的tagname 执行点击事件：1 2 3 HtmlElementCollectionhte = webBrowser1.Document.GetElementsByTagName("td"); if(hte[0] != null) hte[0].InvokeMember("click");3、根据已知的class 执行点击事件：该操作必须添加引用 Microsoft.mshtml (点击引用右键 -->添加引用 --> .NET- ->Microsoft.mshtml)。

1 2 3 4 5 6 7 8 9 10 11 12 13 14 HtmlElementCollectionhte = webBrowser1.Document.GetElementsByTagName("td"); foreach (HtmlElement he in hte) { if (he == null) { continue; } string cln = ((mshtml.HTMLTableCell)(ds.DomElement)).className; if(cln == "td_classname") { he.InvokeMember("click"); break; } }4、根据已知的name 执行点击事件:1 2 3 4 5 6 7 8 9 10 HtmlElementCollectionhte =webBrowser1.Document.GetElementsByTagName("td");foreach (HtmlElement he in hte){if (he == null){continue;}if(== "td_name"){11 12 13 he.InvokeMember("click");break;}}根据id 对该元素写入值（前提是这个元素可以写入值）：1 webBrowser1.Document.GetElementById("textbox_id").InnerText = "aaaaaaaaaa";根据id 获取元素的值（）：1 string str = webBrowser1.Document.GetElementById("textbox_id").InnerText;。

vbwebbrowser控件详解

vbwebbrowser控件详解vb+webbrowser控件详解1、获得浏览器信息private sub command1_click()webbrowser1.navigate ""end subprivate sub command2_click()dim owindowdim onavset owindow = webbrowser1.document.parentwindowset onav = owindow.navigatordebug.print eragentset owindow = nothingset onav = nothingend sub点击command1浏览⽹页，点击command2在⽴即窗⼝中输出浏览器信息。

2、弹出webbrowser消息窗⼝dim owindowset owindow = webbrowser1.document.parentwindowowindow.confirm "abcd"vb调⽤webbrowser技巧集2向webbrowser中写⼊html内容的⼏种⽅法⾸先在form_load中加⼊webbrowser1.navigate "about:blank"确保webbrowser1可⽤⽅法1：dim s as stringdim stream as istreams = "hello world "webbrowser1.document.write s⽅法2：dim oset o = webbrowser1.document.selection.createrangedebug.print oif (not o is nothing) theno.pastehtml "哈哈"set o = nothingend if⽅法3：'插⼊⽂本框dim oset o = webbrowser1.document.selection.createrangeo.execcommand "inserttextarea" false "xxx"vb调⽤webbrowser技巧集31、页⾯滚动：private sub command2_click()webbrowser1.document.parentwindow.scrollby 0 30end subprivate sub form_load()webbrowser1.navigate ""end sub点击command2就可以使当前页⾯向下滚动30像素2、判断页⾯是否可以前进后退private sub command1_click()webbrowser1.goforwardend subprivate sub command2_click()webbrowser1.gobackend subprivate sub form_load()webbrowser1.navigate ""end subprivate sub webbrowser1_commandstatechange(byval command as long byval enable as boolean)if (command = csc_navigateback) thencommand2.enabled = enableend ifif (command = csc_navigateforward) thencommand1.enabled = enableend ifend subvb调⽤webbrowser技巧集41、如何使⽹页不出现滚动条：private sub mnuscroll1_click()@#注意：必须在⽹页完全显⽰之后才可以运⾏webbrowser1.document.body.scroll = "no" @#不显⽰滚动条的办法end subprivate sub mnuscroll2_click()@#注意：必须在⽹页完全显⽰之后才可以运⾏webbrowser1.document.body.scroll = "auto" @#显⽰滚动条的办法end sub2、如何获得⽹页中被选中部分的html：private sub command1_click()dim objselectiondim objtxtrangeset objselection = webbrowser1.document.selectionif not (objselection is nothing) thenset objtxtrange = objselection.createrangeif not (objtxtrange is nothing) thendebug.print objtxtrange.htmltextset objtxtrange = nothingend ifset objselection = nothingend ifend subprivate sub form_load()webbrowser1.navigate ""end subnavigate ⽅法的语法格式为：webbrowser1.navigate url[flags][targetframename][postdata][headers]webbrowser 控件⽀持的主要⽅法有:goback———回退到上⼀屏。

TWebBrowser 与 MSHTML(5)document 对象的属性、方法、事件纵览

{IHTMLDocument2 方法:}write//写入writeln //写入并换行open //打开一个流，以收集document.write 或document.writeln 的输出close //关闭并输出用document.open 方法打开的流clear //清空文档中所有元素, 可能暂时不支持queryCommandSupported //是否支持指定命令queryCommandEnabled //指定命令是否有效queryCommandState //是否设置了指定命令queryCommandIndeterm //指定命令是否处于不确定状态queryCommandText //命令queryCommandValue //命令值execCommand //执行命令execCommandShowHelp //命令帮助信息createElement //建立元素elementFromPoint //指定坐标下的元素createStyleSheet //创建一个样式表{IHTMLDocument2 属性:}all //所有HTML 元素的集合images //所有image 对象的集合applets //所有applet 对象的集合links //所有link 对象的集合forms //所有form 对象的集合anchors //所有anchor 对象的集合scripts //所有script 对象的集合frames //所有frame 对象的集合, 这应该和window.frames 是一样的embeds //所有embed 对象的集合plugins //所有plugin 对象的集合styleSheets //样式表集合title //网页标题body //body 对象activeElement //当前具有输入焦点的元素designMode //设计模式, 可选值: Inherit On Offselection //当前选择readyState //页面读取状态: uninitialized、loading、loaded、interactive、completed linkColor //链接的颜色alinkColor //活动链接的颜色vlinkColor //已访问过的链接的颜色bgColor //背景颜色fgColor //文本颜色referrer //返回载入当前页面的页面的URLlocation //同window.locationlastModified //返回文档最后修改的日期和时间url //返回当前文档的URLdomain //返回域名cookie //返回文档相关的cookieexpando //可设置与获取的布尔值, 是否允许扩展charset //获取文档的字符集名称defaultCharset //获取浏览器默认的字符集名称mimeType //文档类型fileSize //文档大小, 单位字节, 用字符串表示fileCreatedDate //文档建立时间???fileModifiedDate //文档修改时间???fileUpdatedDate //文档更新时间???security //文档安全protocol //传输协议nameProp //文件标题, 好像同TitleparentWindow //父窗口Script //{IHTMLDocument2 事件:}onhelp //用F1 获取帮助时onclick //单击时ondblclick //双击时onmousedown //鼠标点下时onmouseup //鼠标抬起时onmousemove //鼠标移动时onmouseover //鼠标进入时onmouseout //鼠标离开时onkeypress //按键时onkeyup //键按住时onkeydown //键抬起时onreadystatechange //状态改变时onrowexit //当前数据源的数据将要发生变化时onrowenter //当前数据源的数据发生变化并且有新的数据时ondragstart //开始拖动时onselectstart //开始选择时onbeforeupdate //更新前onafterupdate //更新后onerrorupdate //更新错误时{IHTMLDocument3 方法:}recalc //重新获取文档中的全部动态属性releaseCapture //释放文档中对象的鼠标捕捉{IHTMLDocument3 属性:}createTextNode //建立文本attachEvent //绑定事件detachEvent //取消事件绑定createDocumentFragment//创建新文档getElementsByName //返回带有指定name 的对象集合getElementById //返回指定id 的第一个对象的引用getElementsByTagName //返回指定标签的对象集合documentElement //获取文档根部节点, 也就是HTML 节点uniqueID //获取对象的唯一标识符dir //parentDocument //enableDownloadbaseUrl //基础地址{IHTMLDocument3 事件:}onrowsdelete //当前数据记录被删除时onrowsinserted //当前数据源将要插入新数据时oncellchange //当数据来源发生变化时ondatasetchanged //数据源发生变化时ondataavailable //当数据接收完成时ondatasetcomplete //当数据源的全部有效数据读取完毕时onpropertychange //改变属性时oncontextmenu //当按下鼠标右键出现菜单或通过键盘触发页面菜单时onstop //停止或离开时{IHTMLDocument4 方法:}focus //获得输入焦点hasFocus //是否拥有输入焦点createDocumentFromUrl //下载指定网页并返回其IHTMLDocument2 接口CreateEventObject //生成当使用fireEvent 方法时用于传递事件相关信息的event 对象???FireEvent{IHTMLDocument4 属性:}createRenderStyle //建立IHTMLRenderStyle 接口namespaces //media //URLUnencoded //获取去除字符编码的URL{IHTMLDocument4 事件:}onselectionchange //改变选择时oncontrolselect //好像是框选时{IHTMLDocument5 方法:}createAttribute //建立指定name 的属性createComment //建立注释{IHTMLDocument5 属性:}doctype //文档类型implementation_ //获取IHTMLDOMImplementation 接口compatMode //兼容模式, 返回BackCompat、CSS1Compat 等{IHTMLDocument5 事件:}onmousewheel //旋转鼠标滚动轮时onfocusin //获取输入焦点时onfocusout //失去输入焦点时onactivate //激活时ondeactivate //当前对象变为父文档的其他对象时onbeforeactivate //onactivate 前onbeforedeactivate //ondeactivate 前。

C# WinForm WebBrowser 资料

1、主要用途：使用户可以在窗体中导航网页。

2、注意：WebBrowser 控件会占用大量资源。

使用完该控件后一定要调用 Dispose 方法，以便确保及时释放所有资源。

必须在附加事件的同一线程上调用Dispose方法，该线程应始终是消息或用户界面(UI) 线程。

3、WebBrowser 使用下面的成员可以将控件导航到特定URL、在导航历史记录列表中向后和向前移动，还可以加载当前用户的主页和搜索页：1.URL属性：可读、可写，用于获取或设置当前文档的URL。

WebBrowser 控件维护浏览会话期间访问的所有网页的历史记录列表。

设置Url属性时，WebBrowser 控件导航到指定的URL 并将该URL 添加到历史记录列表的末尾。

WebBrowser 控件在本地硬盘的缓存中存储最近访问过的站点的网页。

每个页面都可以指定一个到期日期，指示页面在缓存中保留的时间。

当控件定位到某页时，如果该页具有缓存的版本，则直接显示缓存中的内容而不必重新下载该页，从而节省了时间。

使用 Refresh 方法强制 WebBrowser控件通过下载来重新加载当前页，从而确保控件显示最新版本。

注意：即使已请求了另一个文档，该属性也包含当前文档的URL。

如果设置该属性的值，然后立即再次检索该值，要是 WebBrowser 控件尚未来得及加载新文档，则检索到的值可能与设置的值不同。

2.Navigate方法: 将指定位置的文档加载到 WebBrowser 控件中。

3.GoBack方法：如果导航历史记录中的上一页可用，则将 WebBrowser 控件导航到该页。

如果导航成功，则返回true；如果导航历史记录中的上一页不可用，则返回false。

WebBrowser 控件维护浏览会话期间访问的所有网页的历史记录列表。

可以使用GoForward方法实现一个“后退”按钮。

使用 CanGoBack 属性确定导航历史记录是否可用以及是否包含上一页。

delphiWebBrowser的使用方法详解（五）

delphiWebBrowser的使用方法详解（五）/xtfnpgy/article/details/15809635网页代码：<SELECT id=fy onchange=TouchRefresh(1) name=fy> <OPTION selected value=15>每頁顯示15筆</OPTION> <OPTION value=30>每頁顯示30筆</OPTION> <OPTION value=60>每頁顯示60筆</OPTION></SELECT>1.webbrowser执行网页中的JS函数如果要执行T ouchRefresh(1)函数：webbrowser1.oleobject.document.parentwindow.ExecScript( 'TouchRefresh(1)’,'Javascript');webbrowser执行自己的JS函数：wb1.OleObject.document.parentwindow.ExecScript('alert(''自定义函数');','javascript');方法2：wb1.Navigate('javascript:alert(''执行成功!'');');2.webbrowser选择下拉列表varole : olevariantbeginole := webbrowser1.oleobject.document.GetElementByID('fy');ole.value := 60; //下拉框用value,复选框和多选框用checked:='true'ole.onchange; //调用onchange事件end;3.webbrowser按照Form提交（针对提交按钮无id和name的情况）网页代码：<FORM id=loginForm onsubmit="return validate_form()" method=post action=/pass/serviceLoginAuth2><INPUT id=passToken type=hidden name=passToken><INPUT style="DISPLAY: none" id=user class="input_kuang item errortip" name=user><INPUT style="DISPLAY: none" id=pwd class="input_kuang item errortip" value="" type=password name=pwd> <DIV class="sub_login flt_l"><INPUT class="no_bg" value=登入 type=submit></DIV>提交方法：webbrowser1.OleObject.document.forms.item('loginForm'). submit;4.webbrowser去掉滚动条在download事件中：webbrowser1.oleobject.Document.body.Scroll := 'no';webbrowser1.oleobject.Document.documentElement.style.o verflow := 'hidden';webbrowser控制滚动条滚动：webbrowser1.OleObject.document.parentwindow.scrollby(0, 100);//第一个参数横向，第二个竖向 scrollby滚动多少webbrowser1.OleObject.document.parentwindow.scrollto(0, 1000);// scrollto滚动到某个位置5.webbrowser屏蔽鼠标右键TEmbeddedWB设置DisabledPopupMenuItems属性webbrowser1.DisabledPopupMenuItems := [rcmDefault,rcmImage,rcmControl,rcmTable,rcmSelText,rcmAnch or,rcmUnKnown,rcmImageArt,rcmImgDynSrc,rcmDebug,rcmAll]6.webbrowser屏蔽网页图片TEmbeddedWB设置DownloadImages属性webbrowser1.DownloadOptions := [];7.webbrowser按照元素的属性获取元素function GetDocLinkByHref(doc : IHTMLDocument2;str_url:string):IHTMLAnchorElement;vari : Integer;label_iDispatch : iDispatch;label_element : IHTMLAnchorElement; //引用mshtmlbeginResult := nil;doc := webbrowser1.document as Ihtmldocument2;if not Assigned(doc) thenExit;for i:=0 to doc.links.length-1 dobeginlabel_iDispatch := doc.links.item(i,0);label_element := doc.links.item(I,0) as IHTMLAnchorElement;if (AnsiPos(str_url,(doc.links.item(I,0) as IHTMLElement).getAttribute('tag',0))>0)thenbeginResult := label_element;Break;end;end;end;8.webbrowser TEmbededwb屏蔽弹窗并捕获弹窗信息 //在 TEmbededwb的OnShowMessage事件中处理procedure TForm1.wb1NavigateComplete2(Sender: TObject;const pDisp: IDispatch; var URL: OleVariant);VARstr_url : string;beginWb1.OleObject.document.parentWindow.execScript('windo w.alert=null;','JavaScript');Wb1.OleObject.document.parentWindow.execScript('windo w.open=null;','JavaScript');Wb1.OleObject.document.parentWindow.execScript('windo w.close=null;','JavaScript');Wb1.OleObject.document.parentWindow.execScript('windo w.showModalDialog=null;','JavaScript');Wb1.OleObject.document.parentwindow.execscript('functio n confirm() {return true;}','Javascript');end;function TForm1.webbrowser1ShowMessage(Sender: TObject; HWND: Cardinal; lpstrText, lpstrCaption: PWideChar; dwType: Integer; lpstrHelpFile: PWideChar;dwHelpContext: Integer; var plResult: Integer): HRESULT;beginplResult := IDOK; //屏蔽alert\open\close等弹窗Result := S_OK; //屏蔽confirm确认框，并点击确认mmo1.Lines.Add(lpstrText); //lpstrText即为捕获到的弹窗内容end;屏蔽WebBrowser页面中的声音procedure CloseSound;varhWinmm: Cardinal;pwaveOutWrite: Pointer;lp: Cardinal;beginhWinmm := LoadLibrary('Winmm.dll');if hWinmm > 0 thenpwaveOutWrite := GetProcAddress(hWinmm, 'waveOutOpen');if pwaveOutWrite <> nil then beginVirtualProtect(pwaveOutWrite, 3, PAGE_EXECUTE_READWRITE, lp);Move(#C2#C2#18#$00, pwaveOutWrite^, 3);end;end;//强制Webbroser使用IE8内核 SetWBCoreIE8(8000);procedure SetWBCoreIE8(i_value:Integer);varstr_exeName : string;reg : TRegistry;begintrystr_exeName :=RightFromStr(Application.ExeName,'\',False);reg := TRegistry.Create;reg.RootKey := HKEY_LOCAL_MACHINE;if reg.OpenKey('Software\Microsoft\Internet Explorer\Main\FeatureControl', False) thenbeginif not reg.KeyExists('FEATURE_BROWSER_EMULATION') then reg.CreateKey('FEATURE_BROWSER_EMULATION');end;reg.CloseKey;if reg.OpenKey('Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION ', False) thenbeginreg.WriteInteger(str_exeName,i_value);// if not reg.ValueExists(str_exeName) then// begin// reg.WriteInteger(str_exeName,i_value);// end;end;reg.CloseKey;reg.Free;exceptend;end;最后奉献以前收集的关于WB的文章链接：Delphi Webbrowserdelphi 模拟自动登录网页webbrowserdelphi webbrowser查找对象实现自动登录_delphi webbrowser与delphi互动WebBrowser组件和MSHTML 在Delphi中的使用Delphidelphi中Webbrowser - Max Woods - 博客园WebBrowser组件和MSHTML 在Delphi中的使用webbrowser轻松实现自动填表WebBrowser 操作记要 - 万一 - 博客园delphi中Webbrowser的使用技巧 - wystec的日志 - 网易博客delphi webbrowser 遍历网页元素Delphi7 Webbrowser制作网页表单自动提交器按步分析（1） - 中星9号 - 博客园delphi中如何在多线程环境下操作webbrowser控件delphi利用webservise登陆百度VB WebBrowser 为页面添加代码的方法_百度知道关闭webbrowser的弹出框（对话框Delphi中WebBrowser（或者EmbeddedWebBrowser）控件打开部分网站报“Invalid floating point operation”异常的解决方法- XuXn - 博客园Delphi中webbrowser的document 对象的属性方法事件_硬软兼得博客_新浪博客Delphi获取句柄并发送消息delphi WebBrowser获取iframe页面内容Twebbrowser如何写多线程？ - Delphi _ 网络通信_分布式开发【发现】如何屏蔽掉WebBrowser在刷新网页等时候发出的声音- Boringlamb - 博客园对ExtendedWebBrowser的再扩展(续)_呼吸空间_百度空间接收IWebBrowser2的自动化事件_My_百度空间delphi WebBrowser 开发浏览器_SAP学习_abap_百度空间【转】WebBrowser的Cookie操作(与CookieContainer的关系)_奎宇工作室_百度空间蓝鸟-Delphi的WebBrowser改造，对网页中Alter等对话框的改造方法（转载）如何找到webbrowser打开网页中flash的接口？能否用这个接口控制flash的播放？_VC高级研究_积木群组webBrowser获取网页flash句柄模拟单击的问题- .NET技术_ C#VB 如何向 WebBrowser1 中的flash发送左边点击事件 - VB _ 网络编程用WebBrowser实现HTML界面的应用扩展WebBrowser 控件DragWebBrowser FlashGameWebBrowser_C# 视角_CS程序员之窗WebBrowser 设置代理（100分） - Delphi _ 网络通信_分布式开发屏蔽WebBrowser页面中传出来的声音 - jxgxy - 博客园可以对同一个程序中的多个WebBrowser设置不用的代理服务器吗？本地：双线路、双IP、双网卡设置上网_我是谁？—Andy Gu_百度空间Delphi中使用EmbeddedWB屏蔽指定内容的网页对话框- Patrick Pullman - 博客园Web Browser Control –Specifying the IE Version - Rick Strahl's Web LogWebBrowser与IE的关系，如何设置WebBrowser工作在IE9模式下？ - BobLiu - 博客园WebBrowser 中，无法释放内存？ - CSDN论坛 - 为什么浏览器会使用多进程架构。

VBWebbrowser控件使用方法

VB Webbr‎ owser‎控件使用方‎ 法
方法
说明
GoBac‎k 相当于 IE‎的“后退”按钮，使你在当前‎历史列表中‎后退一项
GoFor‎ward 相当于 IE‎的“前进”按钮，使你在当前‎历史列表中‎前进一项 GoHom‎e 相当于 IE‎的“主页”按钮，连接‎的“搜索”按钮，连接用户默‎认的搜索页‎面 Navig‎ate 连接到指定‎的 URL
返回一个 B‎oolea‎n 值，说明 Web‎Brows‎er 当前是‎否正在加载‎URL，如果返回 t‎rue 就可以使用‎stop 方‎法来撤销正‎在执行的访‎问操作
WebBr‎owser‎ 的事件
Priv a‎te Ev ent‎s
Descr‎iptio‎n
Befor‎eNavi‎gate2‎
Priva‎te Sub Comma‎nd2_C‎lick() WebBr‎owser‎1.Docum‎ent.paren‎twind‎ow.scrol‎lby 0, 30 End Sub
Priva‎te Sub Form _‎Load() WebBr‎owser‎1.Navig‎ate "http://www.apple‎" End Sub
VB 调用 w‎ebbro‎wser 技‎巧集 4
1、如何使网页‎不出现滚动‎条：
Priva‎te Sub mnuSc ‎roll1‎_Clic‎k() @#注意：必须在网页‎完全显示之‎后才可以运‎行 WebBr‎owser‎1.Docum‎ent.body.Scrol‎l = "no" @#不显示滚动‎条的办法 End Sub Priva‎te Sub mnuSc ‎roll2‎_Clic‎k() @#注意：必须在网页‎完全显示之‎后才可以运‎行 WebBr‎owser‎1.Docum‎ent.body.Scrol‎l = "Auto" @#显示滚动条‎的办法 End Sub

webbrowser 用法

一、webbrowser 的定义与作用webbrowser，即网页浏览器，是一种用于访问互联全球信息站网页的软件工具。

通过webbrowser，用户可以输入网页位置区域并访问网页内容，浏览器还可以展示各种网页元素，如文字、图片、视瓶和动画等。

由于其重要作用，webbrowser在现代社会中被广泛使用，成为人们日常生活中不可或缺的工具之一。

二、webbrowser 的基本使用方法在使用webbrowser时，我们通常需要了解一些基本的使用方法，以便更加高效地浏览网页内容。

1. 打开 webbrowser要打开webbrowser，只需在计算机桌面或程序菜单中找到已安装的浏览器图标，并双击打开即可。

常见的webbrowser包括Google Chrome、Mozilla Firefox、Microsoft Edge和Safari等。

用户可以根据自己的喜好和需求选择合适的浏览器。

2. 输入全球信息站在webbrowser的位置区域栏中输入网页的URL位置区域，即可打开相应的网页。

用户也可以利用webbrowser提供的搜索引擎功能，在搜索框中输入关键词进行网页搜索。

3. 浏览网页内容一旦打开了网页，用户可以通过滚动页面、点击信息或者进行搜索等操作来浏览网页内容。

webbrowser还提供了书签功能，用户可以将常用的网页添加到书签栏中，以便快速访问。

4. 下载和管理文件webbrowser允许用户在网页上下载各种文件，如文档、图片、音频和视瓶等。

用户可以在下载管理器中查看和管理已下载的文件。

5. 多标签浏览现代webbrowser支持多标签浏览功能，用户可以在同一个浏览器窗口中打开多个标签页，方便在不同页面之间进行切换和比较。

6. 清除浏览数据webbrowser还提供清除浏览数据的功能，用户可以清除浏览历史、缓存文件和 Cookie 等数据，以保护个人隐私并提升浏览速度。

三、webbrowser 的高级功能与技巧除了基本的浏览网页功能外，webbrowser还具有一些高级功能和技巧，可以帮助用户更好地利用浏览器。

delphi webbrowser 使用方法

delphi webbrowser 使用方法Delphi WebBrowser 使用方法Delphi WebBrowser是一种强大的组件，可以嵌入web页面到Delphi应用程序中。

本文将详细介绍使用Delphi WebBrowser的各种方法。

1. 安装和引用要使用Delphi WebBrowser，首先需要做以下几步操作：1.下载并安装Delphi WebBrowser组件包。

2.打开Delphi IDE，创建新项目或打开现有项目。

3.在项目中导入WebBrowser组件包（在IDE的”Component”菜单中选择”Install Packages”）。

2. 创建和显示WebBrowser使用Delphi WebBrowser，你可以轻松创建和显示一个WebBrowser窗口。

以下是一个简单的示例：procedure (Sender: TObject);beginWebBrowser1 := (Self);:= Self;:= alClient;('end;在上述示例中，我们使用Form的OnCreate事件创建了一个WebBrowser对象，并将其展示在一个窗口上。

属性Align设置为alClient，将WebBrowser充满整个窗口。

最后，通过调用Navigate 方法，我们使WebBrowser加载了指定的网址。

3. 与Web页面交互Delphi WebBrowser允许你与嵌入的Web页面进行交互。

以下是一些常用方法的示例：执行JavaScript代码你可以使用Delphi WebBrowser的方法来执行JavaScript代码并获取返回值。

以下示例演示了如何执行JavaScript代码并将结果显示在一个Label控件中：procedure (const ACode: string);varvJsResult: OleVariant;begin// Execute JavaScript code and get the resultvJsResult := (ACode, 'JavaScript');:= vJsResult;end;操作DOM元素要操作Web页面中的DOM元素，你可以使用Delphi WebBrowser 的方法来获取和修改元素的属性和内容。

WebBrowser

来源 Windows8 论坛：
{ Navigate(toolStripTextBox1.Text); } // Navigates to the given URL if it is valid. private void Navigate(String address) { if (String.IsNullOrEmpty(address)) return; if (address.Equals("about:blank")) return; if (!address.StartsWith("http://") && !address.StartsWith("https://")) { address = "http://" + address; } try { webBrowser1.Navigate(new Uri(address)); } catch (System.UriFormatException) { return; } } // Updates the URL in TextBoxAddress upon navigation. private void webBrowser1_Navigated(object sender, WebBrowserNavigatedEventArgs e) { toolStripTextBox1.Text = webBrowser1.Url.ToString(); } C++ // Navigates to the URL in the address text box when // the ENTER key is pressed while the text box has focus. void TextBoxAddress_KeyDown( Object^ /*sender*/, System::Windows::For ms::KeyEventArgs^ e ) { if ( e->KeyCode == System::Windows::Forms::Keys::Enter && !this->TextB oxAddress->Text->Equals( " 示如何使用 WebBrowser 控件实现地址栏。此示例要求窗体包含一个名为 webBrowser1 的 WebBrowser 控件、一个名为 TextBoxAddress 的 TextBox 控件和一个名为 ButtonGo 的 Button 控件。在文本框中键入 URL 并按 Enter 或单击 “ 转到 ” 按钮时，WebBrowser 控件会定位至指定的 URL。通过单击超链接进行定位时，文本框会自动更新以显示当前 URL。 Visual Basic ' Navigates to the URL in the address box when ' the ENTER key is pressed while the ToolStripTextBox has focus. Private Sub toolStripTextBox1_KeyDown( _ ByVal sender As Object, ByVal e As KeyEventArgs) _ Handles toolStripTextBox1.KeyDown If (e.KeyCode = Keys.Enter) Then Navigate(toolStripTextBox1.Text) End If End Sub ' Navigates to the URL in the address box when ' the Go button is clicked. Private Sub goButton_Click( _ ByVal sender As Object, ByVal e As EventArgs) _

delphiWebBrowser的使用方法详解(四)

delphi WebBrowser 的使用方法详解(四)delphi WebBrowser 的使用方法详解(四) -webbrowser 轻松实现自动填表分类：Delphi Webbrowser TembeddedWB 2013-11-01 17:02 220 人阅读评论(0) 收藏举报目录(?)[+]webbrowser 轻松实现自动填表步骤如下：第一步：获取网页调用Webbrowser 的Navigate 系列函数。

等待网页装载完成，得到document 对象。

在调用webBrowser.Document 之前，请确保Webbrowser 网页装载完成，可以通过Webbrowser 的DocumentCompleted 事件进行监视。

小技巧先指定一个变量步骤如下：第一步：获取网页调用Webbrowser 的Navigate 系列函数。

等待网页装载完成，得到document 对象。

在调用webBrowser.Document 之前，请确保Webbrowser 网页装载完成，可以通过Webbrowser 的DocumentCompleted 事件进行监视。

小技巧先指定一个变量：IsCompleted在调用Webbrowser 的Navigate ，Refresh 系列函数之前，将IsCompleted 设为false。

在DocumentCompleted 事件中，如果ReadyState 为plete（值为4），则设IsCompleted 为true.调用webBrowser.Document 之前对IsCompleted 进行判断。

如果不为true,则延时循环等待，直到IsCompleted被设为true.第二步：设置网页元素数据确保得到document 对象之后，通过GetElementById 获取网页元素，如：HtmlElement user = webBrowser.Document.GetElementById("user"); HtmlElement password =webBrowser.Document.GetElementById("password"); 设置网页元素值：user.InnerText = "myname"; password.InnerText = "123456";小技巧作用SetAttribute 设置下拉框，复选框，多选框数据下拉框：secret.SetAttribute("value", "question1"); 复选框rememberme.SetAttribute("Checked", "True"); 多选框cookietime.SetAttribute("checked", "checked");当然，在SetAttribute 之前，也可以用GetAttribute 取相关的属性先进行判断，再根椐需要进行设置。

控件的属性事件及方法

控件的属性事件及方法控件是在应用程序中用于显示和接收用户输入的元素。

每个控件都有其自己的属性、事件和方法，可以通过这些属性、事件和方法来对控件进行操作和处理。

本文将详细介绍控件的属性、事件和方法。

1.属性：属性是控件的特征和状态，可以通过设置属性来改变控件的外观和行为。

常见的控件属性包括：- Visible：控件是否可见。

当Visible属性设置为True时，控件将在应用程序界面中显示；当设置为False时，控件将隐藏。

- Caption：控件的标题或文本。

可以通过设置Caption属性来改变控件上显示的文字内容。

- Enabled：控件是否可用。

当Enabled属性设置为True时，表示控件可以接受用户的输入和操作；当设置为False时，控件将不响应用户的操作。

- Width和Height：控件的宽度和高度。

可以通过设置Width和Height属性来改变控件的尺寸大小。

- Name：控件的标识符。

通过设置Name属性可以为控件分配一个唯一的名称，以便在代码中引用该控件。

2.事件：事件是在特定的操作或条件发生时自动触发的动作。

可以通过响应事件来处理用户的操作和改变控件的状态。

常见的控件事件包括：- Click：鼠标单击事件。

当用户点击控件时，会触发Click事件，可以在该事件中编写相应的处理代码。

- KeyDown和KeyUp：键盘按下和释放事件。

当用户按下或释放键盘上的按键时，会触发相应的KeyDown和KeyUp事件，可以通过处理这些事件来响应键盘输入。

- MouseEnter和MouseLeave：鼠标进入和离开事件。

当用户将鼠标移动到控件上时，会触发MouseEnter事件；当鼠标移出控件时，会触发MouseLeave事件，可以在这些事件中编写相应的处理代码。

3.方法：方法是控件可以执行的操作。

通过调用方法，可以实现对控件的一些特定操作。

常见的控件方法包括：- Show和Hide：显示和隐藏控件。

webbrowser用法

webbrowser是Python中内置的一个模块，用于控制Web浏览器的操作。

它可以启动默认的Web浏览器，打开指定的URL，还可以在浏览器中执行JavaScript代码等操作。

以下是一些常用的webbrowser函数及其用法：1. webbrowser.open(url, new=0, taboolaexec=False)：打开指定的URL。

new参数指定是否在新窗口中打开URL，如果为1，则在新窗口中打开，否则在当前窗口中打开。

taboolaexec参数指定是否使用Taboola广告。

2. webbrowser.open_new(url)：在新窗口中打开指定的URL。

相当于webbrowser.open(url, new=1)。

3. webbrowser.open_new_tab(url)：在新标签页中打开指定的URL。

4. webbrowser.get().open(url, new=0, autoraise=True)：打开指定的URL。

autoraise参数指定是否将浏览器窗口置于最前面。

5. webbrowser.get().open_new(url)：在新窗口中打开指定的URL。

6. webbrowser.get().open_new_tab(url)：在新标签页中打开指定的URL。

7. webbrowser.get().execute_script(script)：在当前浏览器中执行JavaScript脚本。

需要注意的是，使用webbrowser模块时需要先导入webbrowser库。

另外，不同的浏览器有不同的处理方式，因此在使用webbrowser时需要根据具体情况选择合适的浏览器。

vb+Webbrowser控件详解

VB调用webbrowser技巧集4
1、如何使网页不出现滚动条：
Private Sub mnuScroll1_Click()
@#注意：必须在网页完全显示之后才可以运行
WebBrowser1.Document.body.Scroll = "no" @#不显示滚动条的办法
End Sub
WebBrowser1.Navigate2 "about:blank"
End Sub
Top
********************************************************************
请问：在WebBrwoser控件里提供的Navigate或者Navigate2方法中提供了传递数据
Response.Write(strName)
Response.Write(strPassword)
if strName="KingZhang" and strPassword="123456" then
Response.Write("登陆成功")
else
Response.Write("非法登陆用户！")
"hello")
End Sub
asp源码：
<%@ Language=BScript %>
<%
dim strName
dim strPassword
strName=Trim(Request.Form("name"))
strPassword=Trim(Request.Form("password"))

delphi中TWebBrowser的常见属性、方法和使用技巧

delphi中TWebBrowser的常见属性、方法和使用技巧一、常见属性、方法GoBack：方法，后退到上一个页面。

GoForward：方法，前进到下一个页面。

GoHome：方法，调用默认的主页页面，该页面在IE的选项中设定。

GoSearch：方法，调用默认的搜索页面，该页面在IE的选项中设定。

Refresh：方法，刷新当前页面。

Stop：方法，停止调用或打开当前页面。

LocationName：属性(WideString)，当前位置的名称。

LocationURL：属性(WideString)，当前位置的URL。

Busy: 属性(Boolean)，是否正忙。

Visible: 属性(Boolean)，浏览器窗口是否可见。

(以下属性为在TWebBrowser新增，TWebBrowser_V1中没有，其作用有待探索)StatusBar: 属性(Boolean)，是否显示状态栏。

StatusText: 属性(WideString)，状态栏内容。

ToolBar: 属性(SYSINT)，工具栏中的内容。

MenuBar: 属性(Boolean)，是否显示菜单条。

FullScreen: 属性(Boolean)，是否全屏显示。

Offline: 属性(Boolean)，是否脱机浏览。

AddressBar: 属性(Boolean)，是否显示地址栏。

Navigate(const URL: WideString;var Flags, TargetFrameName, PostData, Headers: OleVariant)：方法，调用指定页面具体参数如下：URL：指定页面的URL。

Flags：Word类型，作用还不清楚，可设为0。

TargetFrameName：WideString打开页面所在的Frame，为空字符串时在当前的Frame中打开；TargetFrameName指定的Frame存在时在Frame中打开；TargetFrameName 指定的Frame不存在时则新建一个窗口打开，此时就相当于调用外部的IE浏览器了。

webbrowser navigate 用法

webbrowser navigate 用法WebBrowser控件是.NET框架中的一个重要组件，它提供了一个用于浏览网页的界面，并且可以与网页进行交互。

Navigate方法则是WebBrowser控件中的一个重要方法，它用于打开指定的网页。

一、用法介绍1. 语法结构：Navigate方法的基本语法结构如下：其中，webBrowser1是WebBrowser控件的实例名，URL是要打开的网页的地址。

2. 打开网页：通过调用Navigate方法，可以将指定的网页打开到WebBrowser控件中，用户可以通过浏览器界面进行浏览。

3. 交互操作：在打开网页的同时，WebBrowser控件会与网页进行交互，例如自动刷新网页、加载网页中的控件等。

二、常用属性与方法1. WebBrowser控件的Navigate方法还支持一些属性，如：* Disposition：指定打开网页后的处理方式，如是否在新的窗口或选项卡中打开。

* Flags：指定网页打开时的选项，如是否自动刷新、是否显示地址栏等。

2. WebBrowser控件还提供了其他一些常用属性与方法，如：* Browsers：获取当前浏览器窗口的列表。

* Parent/TopLevelContainer：获取WebBrowser控件的父容器或顶级容器。

* Refresh：手动刷新网页。

三、注意事项1. Navigate方法打开的网页可能会受到用户的浏览器设置、网络环境等因素的影响。

2. WebBrowser控件的操作可能会受到系统安全设置的影响，如是否允许自动播放、是否允许弹出窗口等。

3. 当使用WebBrowser控件打开一些特殊类型的网页（如带有弹出窗口、恶意脚本等）时，可能会对系统造成影响，甚至导致安全风险。

因此，在使用WebBrowser控件时，需要谨慎处理网页的安全性。

4. WebBrowser控件的操作需要考虑到用户体验和兼容性问题，如网页的加载速度、界面布局等。

webbrowser用法

webbrowser用法摘要：1.Web 浏览器简介2.WebBrowser 控件的作用3.WebBrowser 控件的基本属性4.WebBrowser 控件的方法5.WebBrowser 控件的实例正文：1.Web 浏览器简介Web 浏览器，全称网络浏览器，是一种用于访问和浏览互联网上Web 页面的应用程序。

它通过HTTP 协议与Web 服务器进行通信，获取并显示Web 页面。

目前市面上有很多种Web 浏览器，如Microsoft 的Internet Explorer、Google 的Chrome、Mozilla 的Firefox 等。

2.WebBrowser 控件的作用在Windows 窗体应用程序中，若要嵌入一个Web 浏览器，可以使用Visual Basic 提供的WebBrowser 控件。

WebBrowser 控件可以让用户在窗体应用程序中访问和浏览互联网上的Web 页面，实现与Web 服务器进行通信，获取并显示Web 页面的功能。

3.WebBrowser 控件的基本属性WebBrowser 控件的基本属性如下：- Name：设定或返回对象的名称。

- Value：设定或返回控件的值。

- Visible：设定或返回控件是否可见。

-Enabled：设定或返回控件是否可用。

- Left：设定或返回控件左边界的位置。

- Top：设定或返回控件上边界的位置。

- Width：设定或返回控件的宽度。

- Height：设定或返回控件的高度。

- URL：设定或返回控件当前访问的Web 页面的URL。

4.WebBrowser 控件的方法WebBrowser 控件的主要方法如下：- Navigate(URL)：打开指定的Web 页面。

- Stop：停止当前加载的Web 页面。

- Refresh：刷新当前Web 页面。

- GoBack：返回到上一页。

- GoForward：前进到下一页。

- GoTo(URL)：直接跳转到指定的Web 页面。

.net webbrowser用法

一、.NET WebBrowser控件简介.NET WebBrowser控件是一种能够嵌入到Windows窗体应用程序中的浏览器控件，它允许用户在应用程序中浏览网页内容。

这个控件基于Internet Explorer引擎，因此它能够支持大多数IE的功能和特性。

通过使用.NET WebBrowser控件，开发者可以实现在自己的应用程序中显示网页内容，而无需用户离开应用程序去打开外部浏览器。

二、.NET WebBrowser控件的基本用法1. 在窗体中添加WebBrowser控件要在窗体中添加WebBrowser控件，首先需要在Visual Studio的工具箱中找到WebBrowser控件，然后将其拖放到窗体中即可。

2. 加载网页使用WebBrowser控件加载网页十分简单，只需要通过控件的Navigate方法传入网页URL即可实现。

例如：webBrowser1.Navigate("");3. 获取当前网页URL开发者可以通过WebBrowser控件的Url属性获取当前正在浏览的网页的URL，从而实现在应用程序中显示当前网页的位置区域。

4. 前进和后退WebBrowser控件提供了GoBack和GoForward方法，可以让用户在浏览历史记录中进行前进和后退操作。

5. 控制浏览器的其他功能除了上述基本功能外，WebBrowser控件还提供了许多其他功能，例如刷新页面、停止加载、打印页面等。

开发者可以根据自己的需求使用这些功能来控制WebBrowser控件的行为。

三、.NET WebBrowser控件的高级用法1. 与JavaScript交互通过WebBrowser控件的Document属性，开发者可以获取当前网页的DOM结构，并且可以执行JavaScript代码来修改网页内容或与网页进行交互。

2. 处理网页事件WebBrowser控件提供了许多事件，例如DocumentCompleted、Navigating等，开发者可以通过订阅这些事件来处理网页加载完成、用户点击信息等操作。

C# WebBrowser的8个方法、13个属性和事件

C# WebBrowser的8个方法、13个属性和事件1、方法说明GoBack 相当于IE的“后退”按钮，使你在当前历史列表中后退一项GoForward 相当于IE的“前进”按钮，使你在当前历史列表中前进一项GoHome 相当于IE的“主页”按钮，连接用户默认的主页GoSearch 相当于IE的“搜索”按钮，连接用户默认的搜索页面Navigate 连接到指定的URLRefresh 刷新当前页面Refresh2 同上，只是可以指定刷新级别，所指定的刷新级别的值来自RefreshConstants枚举表，该表定义在ExDisp.h中，可以指定的不同值如下：REFRESH_NORMAL 执行简单的刷新，不将HTTP pragma: no-cache头发送给服务器REFRESH_IFEXPIRED 只有在网页过期后才进行简单的刷新REFRESH_CONTINUE 仅作内部使用。

在MSDN里写着DO NOT USE! 请勿使用REFRESH_COMPLETELY 将包含pragma: no-cache头的请求发送到服务器Stop 相当于IE的“停止”按钮，停止当前页面及其内容的载入2、属性说明Application 如果该对象有效，则返回掌管WebBrowser控件的应用程序实现的自动化对象(IDispatch)。

如果在宿主对象中自动化对象无效，这个程序将返回WebBrowser控件的自动化对象Parent 返回WebBrowser控件的父自动化对象，通常是一个容器，例如是宿主或IE窗口Container 返回WebBrowser控件容器的自动化对象。

通常该值与Parent属性返回的值相同Document 为活动的文档返回自动化对象。

如果HTML当前正被显示在WebBrowser中，则Document属性提供对DHTML Object Model的访问途径TopLevelContainer 返回一个Boolean值，表明IE是否是WebBrowser控件顶层容器，是就返回true Type 返回已被WebBrowser控件加载的对象的类型。

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

WebBrowser方法
1、ClientToWindow（IE使用该方法转换客户坐标与窗口坐标，一般不要使用该方法。）
procedure ClientToWindow(var pcx: SYSINT; var pcy: SYSINT);
pcx：坐标点X。
pcy：坐标点Y。
2、ExecWB（允许用户用IOleCommandTarget接口传递一个命令到当前Web浏览器组件。Microsoft定义了一些常量来表示这些命令，ቤተ መጻሕፍቲ ባይዱ是Web浏览器不全部支持这些命令，可用QueryStatusWB方法使用这些命令。）
WebBrowser秘笈之属性、方法、事件
WebBrowser属性
1、AddressBar（是否显示地址栏。）
property AddressBar: WordBool;
2、Busy（是否正在导航到一个新的URL地址或正在下载文档。）
property Busy: WordBool;
8、Navigate2（定位或下载指定的资源，发送HTTP消息到指定的URL并显示指定文件的内容，或导航到不能表达为URL的资源。）
procedure Navigate2(var URL: OleVariant); overload;
procedure Navigate2(var URL: OleVariant; var Flags: OleVariant); overload;
WebBrowser1.ExecWB(OLECMDID_STOP,OLECMDEXECOPT_PROMPTUSER);
3、GoBack（返回到历史列表中的上一个文档。如果历史列表中没有包含另外的文档，该方法将无效。）
procedure GoBack;
返回当前页的上一页，代码如下：
WebBrowser1.GoBack();
显示WebBrowser1组件的名称，代码如下：
Showmessage();
5、FullName（指定主机上Web浏览器组件的可执行文件的完整的合法路径名。）
property FullName: WideString;
15、Type_（指定包含的文档对象的类型名称，读取该属性以确定Automation对象的类型，该对象的接口通过Document属性表示。）
property Type_: WideString;
显示文件的类型，代码如下：
ShowMessage('Automation对象的类型为:'+WebBrowser1.Type_);
property Offline: WordBool;
注意：可以使用IE浏览器保存HTML网页到本地缓存，浏览器可以脱机方式工作。
10、Path（指定主机上Web浏览器组件可执行文件的路径名，不包括文件名。）
property Path: WideString;
Str:= WebBrowser1.Path;
procedure GoHome;
返回主页，代码如下：
If WebBrowser1.Busy Then WebBrowser1.Stop Else WebBrowser1.GoHome;
6、GoSearch（打开已注册的搜索网页，在注册表中指定搜索网页的注册项为：HKEY_CURRENT_USER\Software\Microsoft\IE\Main下的SearchPage名称栏。可用TRegistry、TRegistryIniFile对象或IE浏览器中“工具”中的Internet选项改变注册搜索网页。）
procedure ExecWB(cmdID: OLECMDID; cmdexecopt: OLECMDEXECOPT; var pvaIn: OleVariant; var pvaOut: OleVariant); overload;
调用ExecWB方法能够完成许多功能，例如停止网页浏览，代码如下：
4、GoForward（返回到历史列表中的下一个文档，与最后调用GoBack方法的效果相反。）
procedure GoForward;
返回当前页的下一页，但是如果历史列表中没有下一个文档，则产生异常，代码如下：
Try
WebBrowser1.GoForward();
Except
ShowMessage('Web浏览器组件连接的URL为：'+WebBrowser1.LocationURL);
8、Name（指定计算机上的TWebBrowser的名称。）
property Name: WideString;
9、Offline（指定Web浏览器是否从本地缓存中获取文档。该属性为True时，表示Web浏览器以脱机方式工作，否则为在线方式。）
Else ShowMessage('Web浏览器没有一个具有Automation接口的容器');
4、ControlInterface（访问WebBrowser组件接口，这个接口允许一个Automation控制器访问Web浏览器的属性、方法和事件。）
property ControlInterface: IWebBrowser2;
procedure ExecWB(cmdID: OLECMDID; cmdexecopt: OLECMDEXECOPT); overload;
procedure ExecWB(cmdID: OLECMDID; cmdexecopt: OLECMDEXECOPT; var pvaIn: OleVariant); overload;
procedure Navigate(const URL: WideString); overload;
procedure Navigate(const URL: WideString; var Flags: OleVariant); overload;
procedure Navigate(const URL: WideString; var Flags: OleVariant;var TargetFrameName: OleVariant); overload;
If Not WebBrowser1.RegisterAsDropTarget Then WebBrowser1.RegisterAsDropTarget:=True;
14、Silent（指定TWebBrowser是否显示对话框。该属性为True时，该对话框不再显示脚本错误。）
property Silent: WordBool;
显示网页标题的名称，代码如下：
ShowMessage('网页标题名：'+WebBrowser1.LocationName);
7、LocationURL（确定当前显示文档、文件夹的URL或路径。）
property LocationURL: WideString;
显示地址的完整路径，代码如下：
procedure Navigate2(var URL: OleVariant; var Flags: OleVariant; var TargetFrameName: OleVariant); Overload;
procedure Navigate2(var URL: OleVariant; var Flags: OleVariant; var TargetFrameName: OleVariant; var PostData: OleVariant); overload;
Exit;
End;
5、GoHome（返回已注册主页或开始页，在注册表中指定主页的注册项为：HKEY_CURRENT_USER\Software\Microsoft\IE\Main下的SStartpage名称栏。可用TRegistry、TRegistryIniFile对象或IE浏览器“工具”中的Internet选项改变注册主页。）
End;
3、Container（访问Web浏览器父类或容器的接口。）
property Container: IDispatch;
如果Web浏览器没有一个具有Automation接口的容器，则该属性的值为空。否则可以通过返回的接口，访问Web浏览器父类或容器，代码如下：
If (WebBrowser1.Container<>Nil) Then WebBrowser1.Stop
显示Web浏览器组件所在的可执行文件的名称，并且包含路径，代码如下：
ShowMessage('Web组件所在的可执行文件为：'+WebBrowser1.FullName);
6、LocationName（获得当前在Web浏览器组件中显示的资源名。）
property LocationName: WideString;
procedure GoSearch;
打开已注册的搜索网页，代码如下：
If WebBrowser1.Busy Then WebBrowser1.Stop Else WebBrowser1.GoSearch();
7、Navigate（定位或下载指定的资源，发送HTTP消息到指定的URL并显示指定文件的内容，也可用来显示指定的文件。）
Navigate方法是TWebBrowser组件中最重要的方法之一，使用该方法能够将当前TWebBrowser组件导航到任何存在的链接上，代码如下：
If WebBrowser1.Busy Then WebBrowser1.Stop Else WebBrowser1.Navigate('');
property RegisterAsBrowser: WordBool;