求助:用DBchart动态显示数据(100分)

  • 主题发起人 主题发起人 qdxml
  • 开始时间 开始时间
Q

qdxml

Unregistered / Unconfirmed
GUEST, unregistred user!
现正编一管理信息系统需要根据用户设置条件动态显示数据库中数据趋势,因接触不深,感到困难较大,特请各位大虾多多帮助。
我的思路为:
报表中有数据1、数据2、数据3(均为时间连续数据)等、日期、时间, 用datasource、adoquery、dbchart、combobox动态附值日期、button点击查询,来实现动态查询某一天的数据趋势,将x轴设为时间轴(0:00-23:00),y轴设为数据1、数据2、数据3在各整点时的数据值,用折线显示,不知哪位大虾肯慷慨相助,奉银100两多少?
 
var
Bars : TBarSeries;
begin
Bars := TBarSeries.Create(nil);
Bars.ParentChart := DBChart1;
...
对相应的属性进行操作就可以了。
end;
 
用bar 是不是棒状图?
 
是的
TLineSeries;
THorizBarSeries;
TAreaSeries;
TPointSeries;
TPieSeries;
TFastLineSeries;
TChartShape;
TGanttSeries;
TArrowSeries;
TBubbleSeries;
 
谢谢解答,可我是想用折线在一个dbchart上显示三个以上的趋势,分别用不同颜色代表各个数据趋势,并用maskedit(上面误写为combobox)动态随机赋予日期值,用折线显示所赋日期各整小时时的数据值,用过几种方法均未实现,不知鳄鱼先生有何高见?
 
我用过以下程序,可不能实现,为何?
procedure TForm_sjfxxt.SpeedButton3Click(Sender: TObject);
var
myseries:tlineseries;
begin
with adoquery1do
begin
close;
sql.Clear;
sql.add('select s1,s2,s3 from scsc_tableday where riqi:=trim(maskedit1.Text)');
open;
end;
begin
dbchart1.SeriesList.Clear;
myseries:=tlineseries.Create(self);
myseries.ParentChart:=dbchart1;
myseries.DataSources:=datasource1;
myseries.XValues.ValueSource:='s1';
myseries.yValues.ValueSource:=riqi';
end;
end;
end.
 
还有哪位大侠可予以帮助?
 
最好将程序写的全一些,以便尽快试一下结果。
 
现正编一管理信息系统需要根据用户设置条件动态显示数据库中数据趋势,因接触不深,感到困难较大,特请各位大虾多多帮助。
我的思路为:
报表中有数据1、数据2、数据3(均为时间连续数据)等、日期、时间, 用datasource、adoquery、dbchart、combobox动态附值日期、button点击查询,来实现动态查询某一天的数据趋势,将x轴设为时间轴(0:00-23:00),y轴设为数据1、数据2、数据3在各整点时的数据值,用折线显示,不知哪位大虾肯慷慨相助?
按照鳄鱼先生所供方法,问题仍未解决,不知何因?我的程序如下:
procedure TForm_sjfxxt.SpeedButton3Click(Sender: TObject);
var
myseries:tlineseries;
begin
with adoquery1do
begin
close;
sql.Clear;
sql.add('select s1,s2,s3 from scsc_tableday where riqi:=trim(maskedit1.Text)');
open;
end;
begin
dbchart1.SeriesList.Clear;
myseries:=tlineseries.Create(self);
myseries.ParentChart:=dbchart1;
myseries.DataSources:=adoquery1;
myseries.XValues.ValueSource:='s1';
myseries.XValues.ValueSource:='s2';
myseries.XValues.ValueSource:='s3';
myseries.yValues.ValueSource:=riqi';
end;
end;
end.
 
问题未解决,恳请高手帮助解决。
 
我用chart已经骗了好多分了,不想再去写了。
声明我没用datasource,感觉不好用
顺手贴上
http://www.delphibbs.com/delphibbs/dispq.asp?lid=3397192
http://www.delphibbs.com/delphibbs/dispq.asp?lid=3388694
希望对你有所帮助
 
问题初步解决,只是只能显示一条信息的曲线,当显示多条信息时时间轴范围自动改变由设定的0-23变为0-1,且legend内容变为series0,series1,series2,非我所定义的信息,如流量1,流量2,流量3,不知何故,请各位高手再次指点。
 
问题已初步解决,分数已分配。再提一小问题:运行时如何在legend显示各series titlename,即所定义线名,如流量1,流量2等,而非series1,series2等,请各位高手示教。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
后退
顶部