说三道四技术文摘-感悟人生的经典句子
说三道四 > 文档快照

如何使用DBchart?

编辑:说三道四文库 发布时间:2018-04-27 03:06
HTML文档下载 WORD文档下载 PDF文档下载
有没有介绍DBchart的文章,如何使用DBchart?
我在 http://expert.csdn.net/Expert/topic/2252/2252699.xml?temp=.149914一经回答过了
在贴一遍用DBchart
给你一段代码:
var
 tt: TLineSeries;

begin
  Form25.dbchart1.RemoveAllSeries;
strsql := 'select f_date,f_kwh*100 from a_twstatm where (条件)'
 with Form25.ADOQuery1 do
    begin
      close;
      Sql.Clear;
      Sql.Add(strsql);
      open;
    end;


  begin

   Form25.DBChart1.Legend.Visible := False;
   tt:=TLineSeries.Create(Form25.DBChart1);

      tt.ParentChart:=Form25.DBchart1;
      tt.DataSource := Form25.ADOQuery1;

      tt.SeriesColor := clred;

      tt.XValues.Name := 'X';
      tt.XLabelsSource:= 'f_date';
     
      tt.YValues.ValueSource := 'f_kwh*100';

      tt.Title := '有功电量';


      Form25.DBChart1.Legend.Visible := True;

     end;

end;


还要记得在interface

uses
中加Series

参考参考,应该没问题
备案号:鲁ICP备13029499号-2 说三道四 www.s3d4.cn 说三道四技术文摘