Tdbmemo如何抓游標在螢幕位置 |
|
缺席
|
|
pceyes
尊榮會員   發表：70 回覆：657 積分：1140 註冊：2003-03-13 發送簡訊給我 |
我在dbmemo需要作常用詞輸入盒，當使用者進入dbmemo後，可按Ｆ９，游標所在旁出現輸入盒（form.showmodel）使用者可選擇常用詞輸入，這樣的功能如何做？
我找了很久只有以下的資料，但結果form.top及form.left位置都不對，不知有沒有人有做過，可以指導一下，謝謝！ 用GetCaretPos (a TPoint) 取得游標的位置
然後用 self.ScreenToClient(a TPoint) 轉成相對的物件位置 ■ 取得編輯游標(Edit Cursor)的目前座標 求 y 及 x 座標 int y = Memo1->CaretPos.y; int x = Memo1->CaretPos.x; 或 int y = SendMessage(Memo1->Handle,EM int x = Memo1->SelStart - SendMessage(Memo1->Handle,EM 或 int y = Memo1->Perform(EM_LINEFROMCHAR, -1, 0); int x = Memo1->SelStart - Memo1->Perform(EM_LINEINDEX, -1, 0);
------
努力會更接近成功 |
發表時間：2006-12-30 08:19:44
IP:122.127.xxx.xxx 訂閱
系統時間：2024-05-19 17:46:17
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |