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

圖表TChart繪圖問題

尚未結案
8325100
一般會員


發表:7
回覆:7
積分:2
註冊:2003-05-26

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-08-21 12:06:44 IP:211.22.xxx.xxx 未訂閱
如何讓TChart圖表由左向右連續繪曲線圖,且圖表的畫面會一直更新變動, 而不是圖表的畫面只顯示過去曲線,卻看不到新的曲線在繪圖,也不要讓曲線圖 再從左邊開始重畫,請問有什麼方法可以解決呢?
Winifred
初階會員


發表:3
回覆:34
積分:47
註冊:2002-07-24

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-08-21 13:07:15 IP:61.221.xxx.xxx 未訂閱
您可以參考Delphi本身的範例程式TeeChart裡的Basic那一支(Demo資料夾下)
8325100
一般會員


發表:7
回覆:7
積分:2
註冊:2003-05-26

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-08-21 13:53:36 IP:211.22.xxx.xxx 未訂閱
我看過Delphi的TeeChart範例程式,但是它的繪圖曲線是由右向左開始,並不是從左至右開始連續畫
Winifred
初階會員


發表:3
回覆:34
積分:47
註冊:2002-07-24

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-08-21 14:24:56 IP:61.221.xxx.xxx 未訂閱
恩..不太懂您的意思 您指的'繪圖曲線是由右向左開始'是表示看到的未來的曲線 您要的是希望看到過去的曲線資料值嗎 如果是這樣的話 您試著把範例程式TeeChart裡的Basic那一支修改一下(看是不是您要的)   Procedure Animate(Series:TChartSeries);   Begin       With Series do       Begin         Delete(19); { <-- remove the last point }         { Add a new random point }         AddXY( XValues.First - 1,              YValues.First+(Random(ChartSamplesMax)-(ChartSamplesMax/2)),              '',clTeeColor);       end;     end; 發表人 - winifred 於 2003/08/21 15:28:20
8325100
一般會員


發表:7
回覆:7
積分:2
註冊:2003-05-26

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-08-21 16:43:10 IP:211.22.xxx.xxx 未訂閱
我是想要讓圖表的曲線是由左邊開始畫,然後一直往右方繼續畫圖下去,而我並不想要看過去己畫過的歷史曲線,而是想要在圖表上隨時可看到最新動態的繪圖曲線資料。
Winifred
初階會員


發表:3
回覆:34
積分:47
註冊:2002-07-24

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-08-25 11:41:39 IP:61.221.xxx.xxx 未訂閱
您可以試試看放一個Timer 每當Timer觸發的時候 將Chart上的Series清除掉 重新create 您的 LineSeries 並給值...
kkccgg
初階會員


發表:50
回覆:54
積分:30
註冊:2002-07-28

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-08-29 01:29:03 IP:203.204.xxx.xxx 未訂閱
先定義BottomAxis最大點數,若點數超過最大點數時則將 Bottomaxis最大級最小設在最最大-最大點數即可 maxdot:=500;//最大點數 Form1.B_Axis_Max:=Form1.B_Axis_Max 1; nd:=Form1.B_Axis_Max; Chart1.BottomAxis.Maximum:=nd; Chart1.BottomAxis.Minimum:=nd-maxdot;
morepatric
一般會員


發表:9
回覆:17
積分:5
註冊:2003-07-21

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-08-31 13:23:20 IP:211.76.xxx.xxx 未訂閱
你可以儲存最後一次的點,下次有新值時,再用 Canvas.MoveTo(X,Y); //最後一次的位置 Canvas.LineTo(iNewX,iNewY); //要畫線的終點 如果是描點的方法,也可用此方法。
系統時間:2024-05-18 15:14:48
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!