亚洲免费在线-亚洲免费在线播放-亚洲免费在线观看-亚洲免费在线观看视频-亚洲免费在线看-亚洲免费在线视频

Dephi中獲取webbrowser選取區(qū)域的html代碼示例

系統(tǒng) 2042 0

這個問題來自論壇提問,示例代碼如下,主要是要了解Document對象
Dephi中獲取webbrowser選取區(qū)域的html代碼示例

//------這個論壇居然不支持delphi代碼樣式

unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, OleCtrls, SHDocVw, StdCtrls,mshtml;

type
TForm1 = class(TForm)
WebBrowser1: TWebBrowser;
Button1: TButton;
Memo1: TMemo;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
WebBrowser1.Navigate('www.csdn.net');
end;

procedure TForm1.Button1Click(Sender: TObject);
var doc:mshtml.IHTMLDocument2;
var select:mshtml.IHTMLTxtRange;
begin
doc:= self.WebBrowser1.Document as mshtml.IHTMLDocument2;
select:=doc.selection.createRange() as mshtml.IHTMLTxtRange;
memo1.Text:= select.htmlText;
end;

end.

Dephi中獲取webbrowser選取區(qū)域的html代碼示例


更多文章、技術(shù)交流、商務(wù)合作、聯(lián)系博主

微信掃碼或搜索:z360901061

微信掃一掃加我為好友

QQ號聯(lián)系: 360901061

您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描下面二維碼支持博主2元、5元、10元、20元等您想捐的金額吧,狠狠點擊下面給點支持吧,站長非常感激您!手機(jī)微信長按不能支付解決辦法:請將微信支付二維碼保存到相冊,切換到微信,然后點擊微信右上角掃一掃功能,選擇支付二維碼完成支付。

【本文對您有幫助就好】

您的支持是博主寫作最大的動力,如果您喜歡我的文章,感覺我的文章對您有幫助,請用微信掃描上面二維碼支持博主2元、5元、10元、自定義金額等您想捐的金額吧,站長會非常 感謝您的哦!!!

發(fā)表我的評論
最新評論 總共0條評論
主站蜘蛛池模板: 天天射综合 | 国内在线视频 | 久久国产乱子伦精品在 | 国产麻豆精品aⅴ免费观看 国产麻豆精品hdvideoss | 国产毛片在线 | 四虎影院久久久 | 伊人久久大香焦 | 免费精品精品国产欧美在线 | 久草视频在线免费播放 | 男女车车好快的车车免费网站 | 欧美一级毛片免费网站 | 亚洲国产资源 | 日日摸夜夜摸人人嗷嗷叫 | 成人免费毛片观看 | 97视频免费在线 | 成人香蕉| 麻豆va一区二区三区久久浪 | 奇米777视频国产 | 天天综合网在线 | 亚洲欧美视屏 | 国产成人禁片免费观看视频 | 久久嫩模 | 成人凹凸短视频在线观看 | 99久久一区 | 国产又黄又a又潮娇喘视频 国产又色又爽又黄又刺激18 | 日韩美女va在线毛片免费知 | 黄频网站在线观看视频 | 久久久久久国产视频 | 94欧美| 久久99热精品这里久久精品 | 国产成人精品午夜在线播放 | 国产 欧美 日产中文 | 97免费观看| 久久 精品| 色婷婷视频在线观看 | 精品国产精品国产偷麻豆 | 久久久青青| 天天干天天爽天天射 | 精品国产精品国产 | 成人夜色视频网站在线观看 | 97视频在线观看播放 |