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

Paradox資料庫Binary形態的讀寫

缺席
zxy666666
中階會員


發表:108
回覆:150
積分:86
註冊:2005-01-14

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-05-28 10:14:44 IP:59.36.xxx.xxx 未訂閱
大家好! 我的Form1上有一個Chart1曲線圖(多曲線) 請問可以否做到分別將各曲線的X軸,Y軸的值抓下來,並存到一個資料表Table1中的一個欄位中去呢?欄位型態為(Binary) 之後再點一個Button又可以從資料庫的中抓出對應的曲線圖來呢?不知如何下手,請各位前輩指點一下,謝謝!
zxy666666
中階會員


發表:108
回覆:150
積分:86
註冊:2005-01-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-05-28 10:58:55 IP:59.36.xxx.xxx 未訂閱
我抓取chart1的點至Memo1顯示看了一下. 發現一個問題了: X軸抓的數據不對,因為X軸本身為時間型的,變為一長串數據:1.39236111111111E-5,應該是:00:00:01才對啊? 還有怎麼存到資料庫?如 class="code"> procedure TForm1.Button1Click(Sender: TObject); var I,Len : Integer; Array1,Array2,Array3 : Array OF double; begin Len := Chart2.Series[0].Count; SetLength(Array1,Len); SetLength(Array2,Len); SetLength(Array3,Len); showmessage(inttostr(Len)) ; For I := 0 to Len - 1 do begin Array1[i] := Chart2.Series[0].YValue[i];//第一條曲線 Array2[i] := Chart2.Series[1].YValue[i];//第二條曲線 Array3[i] := Chart2.Series[0].XValue[i]; Memo1.Lines.Add(FloatToStr(Array1[i]) ',' FloatToStr(Array2[i]) ',' FloatToStr(Array3[i])); end; end;
系統時間:2024-06-22 4:07:17
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!