在DELPHI 7 中如何使用"TDBChart"?

Question

  各位朋友,大家好.
   我现在想使用"TDBChart"把ACCESS中的数据以统计图形的样式比较直观的显示出来.   ACCESS的目录"D:\WATER\数据库.mdb"
   统计图形"饼型图、柱状图、线条型“三种。   具体步骤是什么？
  谢谢了。

Answer 1

TADOTable 连接“D:\WATER\数据库.mdb” 其属性ConnectionString 有连接配置向导TDBChart  右击有“Edit Chart”向导
     新建了一个 Series;
     Series标签下－>DataSources 标签下－>选DataSet->DataSet选那个TADOTable(如ADOTable1)

Answer 2

procedure TForm1.BClick(Sender: TObject);
begin
//  B: TButton;
//  C: TDBChart;
//  Q: TADOQuery;
//  S: TDBCrossTabSource;  with Q do
  begin
    if Active then Close;    ConnectionString:= 'Provider=Microsoft.Jet.OLEDB.4.0;'
                      +'Password="";Data Source=D:\WATER\数据库.mdb;'
                      +'Persist Security Info=True';
    SQL.Clear;
    SQL.Add('select l,v from table where condition');
    Open;
  end;
  // 设计时 先建一个Series: 比如Series1
  
  S.Series:= C.Series[0];
  
  S.DataSet:= Q;  S.LabelField:= 'l';
  S.ValueField:= 'v';
  DSrc.Active:= True;
  C.Series[0].RefreshSeries;end;