72. 排序程式之cpu時間畫圖表 (TChart)

1. 在BCB裡新增一個 TChart 的元件，

2. 在TChart 上點兩下並按下Add 加入所要的線條 (圖中示範為 Line)

3. 可加入按鈕及輸入的Edit，並可測試下面的範例程式

//清除Chart 上的所有線條設定

Chart1->RemoveAllSeries();

// 設定此 char Title 名稱

//(是 StringList 不是 String 所以不能用 Chart1->Title->Text="xxx" ...)

Chart1->Title->Text->Clear();

Chart1->Title->Text->Add("Sorting Alg");

Chart1->BottomAxis->Title->Caption = "Data"; //水平座標軸的標題

Chart1->LeftAxis->Title->Caption = "CPU Time"; //垂直座標軸的標題

//利用 for 迴圈新增線條

for (int i=1;i<=3;i++)

{

TLineSeries *Series=new TLineSeries(Chart1);

Series->ParentChart=Chart1;

Chart1->AddSeries(Series);

}

// 輸入假資料

int n; // Value

n = this->Edit1->Text.ToInt();

int r;

for (int i=0; i<n; i++)

{

r = rand()%n+1;

Chart1->Series[0]->Title = "Bubble Sort";

Chart1->Series[1]->Title = "Insertion Sort";

Chart1->Series[2]->Title = "Quick Sort";

Chart1->Series[0]->Add( r*43 , i , clBlue );

Chart1->Series[1]->Add( r*10 , i , clRed );

Chart1->Series[2]->Add( r , i , clYellow );

}

4. 輸出後畫面