我找不到DBCHART的例子,谁给我一个,
谢谢~~或加我QQ:15345566~~~~~

解决方案 »

  1.   

    \Program Files\Borland\Delphi7\Demos\TeeChart
    我就是看的这个demo,要不你也看看行不行
      

  2.   

    对看delphi自带TChart的demo,功能很齐
      

  3.   

    之前我也是这个东西搞得头痛死成功实现两个SERIES的DBCHART
    adoquery1.SQL.Add('select * from 表1');
    adoquery1.Active:=true;
    series1.Active:=false;
    series1.DataSource:=adoquery1;
    series1.XValues.ValueSource:='字段1';
    series1.YValues.ValueSource:='字段2';
    series1.Active:=true;adoquery2.SQL.Add('select * from 表2');
    adoquery2.Active:=true;
    series2.Active:=false;
    series2.DataSource:=adoquery2;
    series2.XValues.ValueSource:='字段1';
    series2.YValues.ValueSource:='字段2';
    series2.Active:=true;
      

  4.   

    再给个稍详细点的,源程序删了,看看应该懂了吧adoquery1.SQL.Add('select * from longbiao');   //加QUERY的SQL语句;
    adoquery1.Active:=true;    //打开QUERY;
    series1.Active:=false;     //关闭SERIES;
    series1.DataSource:=adoquery1;   //连接数据库;
    series1.XLabelsSource:='id';  //必须是数据库字段名;
    series1.XValues.ValueSource:='id'; //设定X轴的数据,必须是数据库字段名;
    series1.YValues.ValueSource:='long'; //设定Y轴的数据,必须是数据库字段名;
    series1.Active:=true;     //打开SERIES;
    dbchart.Title.Text.Clear;  //标题清空;//dbchart.Title.Text.Add('我的');     //加入自己定义的标题;
    series1.Marks.Visible:=false;       //X轴上方的‘指视’取消;