最近開發(fā)要使用圖表，Delphi里提供了圖表開發(fā)的控件TChart，可惜幫助里沒有DEMO代碼，上網(wǎng)搜索了一下，竟然發(fā)現(xiàn)文章也少的可憐。沒辦法，自己豐衣足 食，寫代碼試用，看幫助，讀代碼，搞了半天大概弄明白了TChart的使用方式，下面寫一下幾個(gè)常見問題的解決。

1.如何寫一個(gè)TChart的Hello World？

　　放一個(gè)控件到窗體上，然后寫代碼加入一個(gè)折線數(shù)據(jù)序列：

var

Series: TLineSeries;

begin

Series := TLineSeries.Create(Chart1);

Series.Add(100, 'aaa', clRed);

Series.Add(200, 'AAA', clGreen);

Chart1.AddSeries(Series);

end;

這樣就會(huì)生成一個(gè)簡(jiǎn)單的折線圖表，要生成其它類型的數(shù)據(jù)圖表，可以添加不同的數(shù)據(jù)序列（各種圖表的序列類型可以參考幫助文檔）。

2.如何設(shè)置圖表的標(biāo)題？

　　TChart組件提供了Title屬性可以這是圖表的標(biāo)題，包括標(biāo)題的內(nèi)容、字體、對(duì)齊方式等都可以通過Title屬性設(shè)置。

最簡(jiǎn)單的設(shè)置方式：

Chart1.Title.Text.Text := '圖表的標(biāo)題';

3.如何修改圖表的背景顏色和整個(gè)圖表的顏色？

TChart是一個(gè)窗體控件，可以通過修改Color屬性設(shè)置圖表顏色，這是一種最簡(jiǎn)單的方式：

Chart1.Color := clWhite;

修改圖表部分的背景色可以通過BackColor屬性來實(shí)現(xiàn)：

Chart1.BackColor := clGreen;

此外，TChart還提供了漸變的背景支持，通過Gradient控制：

Chart1.Gradient.Visible := True;

Chart1.Gradient.Direction := gdFromTopLeft;

Chart1.Gradient.StartColor := clGreen;

Chart1.Gradient.EndColor := clYellow;

4.TChart的3D效果如何控制？

　　TChart提供了View3D屬性，控制是否使用3D效果，View3dWalls屬性控制是否顯示左側(cè)的3D墻效果

5.如何不顯示圖表控件生成圖表？

　　很遺憾，TChart是一個(gè)Windows窗體控件，必須依附一個(gè)窗體或Windows控件才能使用。如果要不顯示TChart的話，可以將TChart的Visible屬性設(shè)為False來使用。下面的例子創(chuàng)建了一個(gè)隱藏的TChart來生成圖表：

var

Chart: TChart;

S: TChartSeries;

TmpFile: string;

begin

Chart := TChart.Create(nil);

try

Chart.Parent := Application.MainForm;

Chart.Visible := False;

Chart.Title.Text.Text := '測(cè)試圖表';

S := TBarSeries.Create(Chart);

Chart.AddSeries(S);

S.Title := '嘿嘿';

S.AddXY(1, 56, '一月', clGreen);

S.AddXY(2, 67, '二月', clYellow);

S.AddXY(3, 34, '三月', clBlue);

S.AddXY(4, 78, '四月', clRed);

Chart.View3D := False;

Chart.BackColor := clWhite;

Chart.Gradient.StartColor := clWhite;

Chart.Gradient.EndColor := clWhite;

Chart.Gradient.Visible := True;

TmpFile := Application.ExeName + '.bmp';

Chart.SaveToBitmapFile(TmpFile);

Image1.Picture.LoadFromFile(TmpFile);

finally

Chart.Free;

end;

end;

慧都2010促銷季開幕，TeeChart for .NET 8折促銷！詳情咨詢：400-700-1020或023-66090381活動(dòng)詳情：//ke049m.cn/zh-CN/Products_cn/TeeChart_chinese.html