关于dbchart的问题，如显示一条直线x=2y

Question

如题，应该很简单因为没有人问过：）
我就是想在dbchart中画自己想要的线。

Answer 1

procedure  tchartform.getline(x,y:string);
var series1:tpointseries;
begin
  series1:=tpointseries.Create(self);
  series1.ParentChart:=dbchart1;
  series1.DataSource:=dbset;
  series1.Title:=x;
  series1.XValues.ValueSource:=x;
  series1.yValues.ValueSource:=y;
  series1.Active:=true;
  dbchart1.BottomAxis.Title.caption:=x;
  dbchart1.leftAxis.Title.caption:=y;
  dbchart1.leftAxis.Title.Angle:=0;
  dbchart1.Title.Text.Text:=datfm.caption;
  
end;
x and y都是字段名，如果y=2*x,那么这个散点图就出来了