關於資料在下載時，顯示目前讀取的百分比 |
|
答題得分者是：Mickey
|
|
skurama
中階會員   發表：88 回覆：127 積分：73 註冊：2002-07-22 發送簡訊給我 |
請問:
目前我想要利用TQuery在下載資料時，
了解目前下載到幾%的資料，
可是當我一下Active = treu時，
程序就會停下來，
目前只能做到像遊戲裡面Now Loading...
然後Garge不斷在跑(一直0~100)
請問有沒有什麼方法可以大概的捉到目前Query讀取的狀態？
或是大家有什麼障眼法，可以讓資料在讀取時，
不會被誤會當機了。 ----------------
初出芧房程設師，
左鍵右鼠寫程式，
日扣夜寫眼框溼，
望能早成系分師。
----------------
------
---------------- 初出芧房程設師， 左鍵右鼠寫程式， 日扣夜寫眼框溼， 望能早成系分師。 ---------------- |
|
Mickey
版主 發表：77 回覆：1882 積分：1390 註冊：2002-12-11 發送簡訊給我 |
skurama 你好 : BDE 並不是於 open ( Active := True )時, 一次將所有資料取出的,
而是依據"需要"(如 Next/Last 等)時, 才取出, 所以 open 的速度快. 你慢的原因應該在於 Query.SQL 需要大量運算, 也就是
Database Server 從收到 SQL 指令到 Response 的時間很久. 如果你只是想, 不要讓 End User 以為當掉, 可以用 TTimer, QueryBeforeOpen 時 : Timer.Enable := True; QueryAfterOpen 時 : Timer.Enable := False; Timer.OnTimer 時 :
StatusBar.Pandel[0].Text := 'Loading Data...';
StatusBar.Refresh; 用 TProgressBar 或 TGuage 恐怕需要付出一些代價
(如另外的 SQL : select count(*) ....),
才能取得總筆數, 來設定 Max/MaxValue Property.
|
|
T.J.B
版主 發表：29 回覆：532 積分：497 註冊：2002-08-14 發送簡訊給我 |
參考一下
先把Gauge1初始化
Gauge1.Progress := 0;
Gauge1.MinValue := 0;
Gauge1.MaxValue := query1.RecordCount; 然後在讀取資料的迴圈裡在第一行寫
Gauge1.Progress := Succ(Gauge1.Progress); <---遞增效果
這樣就會有你要的效果了 天行健
君子當自強不息~~@.@ 發表人 - T.J.B 於 2003/04/23 13:59:28
------
天行健 君子當自強不息~~@.@ |
|
skurama
中階會員 發表：88 回覆：127 積分：73 註冊：2002-07-22 發送簡訊給我 |
To Mickey >你慢的原因應該在於 Query.SQL 需要大量運算, 也就是
>Database Server 從收到 SQL 指令到 Response 的時間很久. 原本是想說是否能捉到"Database Server 從收到 SQL 指令到 Response"的時間
(好像不太可能預先知道要捉多久@_@)
要做成Garge可能很難，
目前可能還是考慮用 Now Loading的動作
因為如果要做Garge還要下先Select Count。 To T.J.B
因為慢是慢在資料庫回應的時間，
所以如果捉到後在做Garge，會讓Garge一下子從1~100，
客人會覺得怪怪的。 不過還是謝謝大家提供的方法。
看來可能要學PS2遊戲中的Now Load...了~~~~
看看要不要也做個小密蜂。
------
---------------- 初出芧房程設師， 左鍵右鼠寫程式， 日扣夜寫眼框溼， 望能早成系分師。 ---------------- |
發表時間：2003-04-23 11:46:32
IP:61.219.xxx.xxx 未訂閱
系統時間：2024-07-05 15:57:43
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |