delphi利用数据库数据绘制曲线图

2025-04-03 02:51:09

推荐回答（3个）

回答1：

采用tdbchart控件
procedure TForm1.Button1Click(Sender: Object);
var
LS: TLineSeries;
begin
LS := TLineSeries.Create(DBChart1); //这里假设你用的是DBChart1
LS.ParentChart := DBChart1;
LS.Title := '标题'
LS.DataSource := Adoquery1; //这里假设你用的adoquery1作为dataset
LS.XLabelsSource := '你横坐标要显示的字段名称';
LS.YValues.ValueSource := ‘纵坐标的字段名称'; //必须是数值型
end;

回答2：

利用Tchar之类的控件就可以

如果不用，自己画比较麻烦

回答3：

一般你要的CPU使用效率全是在canvas上绘出来的都不用chart的