Delphi 如何抓出在 TWebBrowser 中顯示網頁內用滑鼠選取的資料? |
尚未結案
|
beldandy
一般會員 發表:4 回覆:2 積分:1 註冊:2003-02-12 發送簡訊給我 |
|
ccchen
版主 發表:61 回覆:940 積分:1394 註冊:2002-04-15 發送簡訊給我 |
|
cooper
一般會員 發表:17 回覆:41 積分:11 註冊:2002-03-25 發送簡訊給我 |
引言:你可以使用在程式中引入 DHTML Model 並且使用跟JavaScript相同的方式來取 得網頁的選取文字(使用IHTMLTxtRange)即可 :P引言: Delphi 如何抓出在 TWebBrowser 中顯示網頁內用滑鼠選取的資料? 例如我的網頁內有「繼續測試中」五個字 然後我用滑鼠選了測試兩個字 如何能把這些字抓出來使用?? 謝謝大家 < >< >只要initial ole如下,在WebBrowser中, copy/paste等功能就可用了 須uses activexinitialization OleInitialize(nil); finalization OleUninitialize; end. |
timhuang
尊榮會員 發表:78 回覆:1815 積分:1608 註冊:2002-07-15 發送簡訊給我 |
hi, 小弟試了一下, 可以這樣取得在 WebBorwser 中選取的字串, 記得要 use MSHtml
procedure TForm1.Button2Click(Sender: TObject); var hd: IHTMLDocument2; ht: IHTMLTxtRange; begin hd := webbrowser1.Document as IHTMLDocument2; ht := hd.selection.createRange as IHTMLTxtRange; showmessage(ht.text); end; |
Ktop_Robot
站務副站長 發表:0 回覆:3511 積分:0 註冊:2007-04-17 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |