滑鼠圈選文字內容問題 |
答題得分者是:老大仔
|
lonhou2005
一般會員 發表:3 回覆:6 積分:1 註冊:2009-08-06 發送簡訊給我 |
|
老大仔
尊榮會員 發表:78 回覆:837 積分:1088 註冊:2006-07-06 發送簡訊給我 |
第一個問題小弟不太清楚是否可行
但對於第二個問題 假如是想判斷剪貼簿中是否有文字內容 可以用比較簡單的方式判斷~ 先uses Clipbrd 在Timer的事件中: if Trim(ClipBoard.AsText) <> '' then Memo1.Lines.Add(ClipBoard.AsText); ClipBoard.Clear; ===================引 用 lonhou2005 文 章=================== 在Delphi中, 可否去判斷滑鼠所圈選文字的內容(備註:滑鼠圈選的文字並非在自己本身程式,而是像是網頁中或Word內之文字內容), 並且當按下Ctrl C時, 可以複製到剪貼簿, 並且自己所製作的程式可同時抓取其文字內容? 如可以那該如何去實現它? ((小弟為Delphi新手,但因所製作程式需求,請各位大大幫忙! |
lonhou2005
一般會員 發表:3 回覆:6 積分:1 註冊:2009-08-06 發送簡訊給我 |
感謝大大的剪貼怖判斷提醒
小弟想到直接判斷剪貼怖 是否有東西 然後再執行所製作程式想執行的步驟就可以了 ((奇怪...當初怎沒想到 ~"~ 但小弟又有另一個問題 那就是有沒有可能 直接複製滑鼠圈起來的文字((不必按下Ctrl C ===================引 用 老大仔 文 章=================== 第一個問題小弟不太清楚是否可行 但對於第二個問題 假如是想判斷剪貼簿中是否有文字內容 可以用比較簡單的方式判斷~ 先uses Clipbrd 在Timer的事件中: if Trim(ClipBoard.AsText) <> '' then Memo1.Lines.Add(ClipBoard.AsText); ClipBoard.Clear;
編輯記錄
lonhou2005 重新編輯於 2010-12-16 22:45:54, 註解 無‧
|
mephise
高階會員 發表:4 回覆:149 積分:205 註冊:2004-02-09 發送簡訊給我 |
|
lonhou2005
一般會員 發表:3 回覆:6 積分:1 註冊:2009-08-06 發送簡訊給我 |
透過Edit1的方式小弟有些了解
只是 小弟所要抓取的文字並非在本身程式內 而是位於其他文件中 如:Word、網頁內容... ===================引 用 mephise 文 章=================== 很簡單, procedure TForm2.Button1Click(Sender: TObject); begin Button1.Caption := Edit1.SelText; end; 依照上例, 這樣就會把 Edit1 被圈選的部分複製到 Button1 的標題上了 TMemo 也有類似的屬性 |
mephise
高階會員 發表:4 回覆:149 積分:205 註冊:2004-02-09 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |