討論區快速選單
知識庫快速選單
網路投保旅行平安險 學Java開發這些基本功一定要會 Salesforce打造企業目標
[ 回上頁 ] [ 討論區發言規則 ]
如何才能讓Memo的ScrollBar自動向下捲動呢?
更改我的閱讀文章字型大小
作者 : 3mountain(小山)
[ 貼文 14 | 人氣 2134 | 評價 0 | 評價/貼文 0 | 送出評價 3 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2003/10/27 下午 05:12:13
假設已讀入3萬多行的資料進Memo1,而之後將依序將Memo1的內容一行一行的寫進Memo2裡,在寫入的同時希望能做到讓Memo1也能夠隨著資料的寫入的動作(從Memo1寫到Memo2)而捲動ScrollBar,該怎麼做呢?^^"
作者 : gemi0305(Gemi0305) C++ Builder優秀好手
[ 貼文 168 | 人氣 5290 | 評價 820 | 評價/貼文 4.88 | 送出評價 280 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2003/10/27 下午 09:52:27
你好,
這裡有一些可參考的文章,
http://delphi.ktop.com.tw/topic.asp?TOPIC_ID=38095

不過我覺得你的問題,只需要簡單的處理就可以了,
如以下範例,在form上加入一個memo和一個timer:

int TotalLine=0;
int indexLine=0;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
     : TForm(Owner)
{
     Memo1->Lines->LoadFromFile("c:\\10.txt");
     TotalLine = Memo1->Lines->Count;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
     if (indexLine < TotalLine)
     {
     indexLine++;
     Memo1->Perform(WM_VSCROLL,SB_LINEDOWN ,0);
     }
}

重點只有if裡面那兩行,你每跑完一行,就執行那兩行,
會讓scrollbar往下移一行~ 就有自動捲動的效果,試試看吧 ^ ^

作者 : 3mountain(小山)
[ 貼文 14 | 人氣 2134 | 評價 0 | 評價/貼文 0 | 送出評價 3 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2003/10/31 下午 03:06:50
謝謝你^____________^
我找了好久就是找不到下面這個函式,
Perform(WM_VSCROLL,SB_LINEDOWN ,0);
請問它是windows API嗎?
可不可以推一下幾本讓人捨得花錢的好書(about bcb programming)?^^
 板主 : 徵求中
 > C++ Builder - 討論區
 - 最近熱門問答精華集
 - 全部歷史問答精華集
 - C++ Builder - 知識庫
  ■ 全站最新Post列表
  ■ 我的文章收藏
  ■ 我最愛的作者
  ■ 全站文章收藏排行榜
  ■ 全站最愛作者排行榜
  ■  月熱門主題
  ■  季熱門主題
  ■  熱門主題Top 20
  ■  本區Post排行榜
  ■  本區評價排行榜
  ■  全站專家名人榜
  ■  全站Post排行榜
  ■  全站評價排行榜
  ■  全站人氣排行榜
 請輸入關鍵字 
  開始搜尋
 
Top 10
評價排行
C++ Builder
1 windblown 5420 
2 Raynor 3120 
3 阿泰 2980 
4 workman 1650 
5 Linkin 1360 
6 CrazyStar 1260 
7 青衫 1160 
8 jonay 1080 
9 charlie 900 
10 小呆 770 
C++ Builder
  專家等級 評價  
  一代宗師 10000  
  曠世奇才 5000  
  頂尖高手 3000  
  卓越專家 1500  
  優秀好手 750  
Microsoft Internet Explorer 6.0. Screen 1024x768 pixel. High Color (16 bit).
2000-2017 程式設計俱樂部 http://www.programmer-club.com.tw/
0.0625