全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:863
推到 Plurk!
推到 Facebook!

請問DBMemo要如何知道游標停在那一列呢?

尚未結案
chlo
一般會員


發表:7
回覆:13
積分:4
註冊:2003-04-17

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-03-05 22:32:42 IP:211.76.xxx.xxx 未訂閱
請問各位先進: DBMemo中要如何知道游標停在第幾列呢?
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-03-06 11:02:20 IP:202.39.xxx.xxx 未訂閱
DBMemo1.CaretPos.x; => x 軸 DBMemo1.CaretPos.y; => y 軸 --- 屬於那自己生命的歌 不管是什麼顏色
chlo
一般會員


發表:7
回覆:13
積分:4
註冊:2003-04-17

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-03-06 16:47:49 IP:211.76.xxx.xxx 未訂閱
謝謝您 hagar 版主
breeze_1
一般會員


發表:33
回覆:72
積分:21
註冊:2003-05-26

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-03-19 11:10:38 IP:61.152.xxx.xxx 未訂閱
如果要控制遊標到某一位置呢
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-03-19 11:19:53 IP:202.39.xxx.xxx 未訂閱
參考 move the caret in TRichEdit to a specified position: http://www.swissdelphicenter.ch/en/showcode.php?id=212 TDBMemo 應該也適用.
procedure RichEdit_MoveTo(RichEdit: TRichEdit; LineNumber, CharNumber: Word); 
begin 
  RichEdit.SelStart := RichEdit.Perform(EM_LINEINDEX, LineNumber, 0)   CharNumber); 
end;     procedure TForm1.Button1Click(Sender: TObject); 
begin 
  RichEdit_MoveTo(RichEdit1,2,5); 
  Application.ProcessMessages; 
  RichEdit1.SetFocus; 
end; 
--- 這次沒買到 cd-pro2 實在很 ...
breeze_1
一般會員


發表:33
回覆:72
積分:21
註冊:2003-05-26

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-03-19 12:29:12 IP:61.152.xxx.xxx 未訂閱
好像不行,因爲memo是二維的,如何指定x,y
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#7 引用回覆 回覆 發表時間:2004-03-19 12:54:18 IP:202.39.xxx.xxx 未訂閱
引言: 好像不行,因爲memo是二維的,如何指定x,y
RichEdit_MoveTo(RichEdit1, 2, 5); // 中的 2 與 5 就是 x 與 y 的值 --- 這次沒買到 cd-pro2 實在很 ...
breeze_1
一般會員


發表:33
回覆:72
積分:21
註冊:2003-05-26

發送簡訊給我
#8 引用回覆 回覆 發表時間:2004-03-19 13:24:52 IP:61.152.xxx.xxx 未訂閱
引言:引言: -------------------------------------------------------------------------------- 好像不行,因爲memo是二維的,如何指定x,y -------------------------------------------------------------------------------- RichEdit_MoveTo(RichEdit1, 2, 5); // 中的 2 與 5 就是 x 與 y 的值
x可以到第2行,但不能到第5列
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#9 引用回覆 回覆 發表時間:2004-03-19 13:34:56 IP:202.39.xxx.xxx 未訂閱
第二行有超過 5 個字嗎? 小弟這邊試(用 TMemo), 沒有的話是不行的. --- 這次沒買到 cd-pro2 實在很 ...
breeze_1
一般會員


發表:33
回覆:72
積分:21
註冊:2003-05-26

發送簡訊給我
#10 引用回覆 回覆 發表時間:2004-03-19 13:43:59 IP:61.152.xxx.xxx 未訂閱
RichEdit.SelStart := RichEdit.Perform(EM_LINEINDEX, LineNumber, 0) + CharNumber); 
引言:
這行多一個')' 第2行有多餘5個字符,但是還是在行首。
breeze_1
一般會員


發表:33
回覆:72
積分:21
註冊:2003-05-26

發送簡訊給我
#11 引用回覆 回覆 發表時間:2004-03-19 13:44:19 IP:61.152.xxx.xxx 未訂閱
RichEdit.SelStart := RichEdit.Perform(EM_LINEINDEX, LineNumber, 0) + CharNumber); 
引言:
這行多一個')'? 第2行有多餘5個字符,但是還是在行首。
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#12 引用回覆 回覆 發表時間:2004-03-19 13:50:28 IP:202.39.xxx.xxx 未訂閱
1.那個右括號請自行刪除 2.小弟再改用個 TRichEdit 來試也可以的 --- 這次沒買到 cd-pro2 實在很 ...
breeze_1
一般會員


發表:33
回覆:72
積分:21
註冊:2003-05-26

發送簡訊給我
#13 引用回覆 回覆 發表時間:2004-03-19 14:08:08 IP:61.152.xxx.xxx 未訂閱
的確可以,謝謝
系統時間:2024-05-19 3:29:28
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!