关于DBChart 的问题???? 使用access数据库,sql语句:select zyb.zymc,count(xsxxb.bh) as bh from xsxxb,zyb where xsxxb.sxzy=zyb.zymc group by zyb.zymc为什么在series的dateset 中使用adoquery 却只有bh 一个字段可选?怎么解决? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 sql语句:select zyb.zymc,count(*) as bh from xsxxb,zyb where xsxxb.sxzy=zyb.zymc group by zyb.zymc with DBchart1 do begin AddSeries(TBarSeries.Create(Self)); Series[DBchart1.SeriesCount-1].Title:='数据库增长情况查询'; LeftAxis.Title.Caption:='增长数据'; BottomAxis.Title.Caption:='日期'; with series[DBchart1.SeriesCount-1] do begin Marks.ArrowLength := 8; Marks.Style := smsValue; Marks.Visible := true; DataSource:=Query_Database; XValues.Name := 'X'; Xvalues.DateTime:=true; XValues.ValueSource :='System_Nowtime'; YValues.Name := 'Y'; YValues.ValueSource :='Database_Increase'; end; end;这样可以动态创建dbchart,XValues.ValueSource 就是要显示的x轴的数据集,YValues.ValueSource 就是要显示的y轴的数据集,'System_Nowtime','Database_Increase'都是数据库一个表中的两个字段 delphi 调用webservices ! 准备月底回家,回家修炼技术...... 用Indy的IdMessage组件封装邮件,怎样才能让它不对主题进行Base64编码? pascal的扑克发牌函数 QuickRep控件中QRDBText如何换行? 一个关于邮件收发的问题 怎么更改DBgride中的数据? asta的问题? 高分求就,那里有介绍关于包和dll的文字和实例资料? 毕业设计要用D2007做个企业用的短信和邮件服务器 小女子有一事相求。 FastReport的BUG,在动态连接库中打印报表,高手请进。
begin
AddSeries(TBarSeries.Create(Self));
Series[DBchart1.SeriesCount-1].Title:='数据库增长情况查询';
LeftAxis.Title.Caption:='增长数据';
BottomAxis.Title.Caption:='日期';
with series[DBchart1.SeriesCount-1] do
begin
Marks.ArrowLength := 8;
Marks.Style := smsValue;
Marks.Visible := true;
DataSource:=Query_Database;
XValues.Name := 'X';
Xvalues.DateTime:=true;
XValues.ValueSource :='System_Nowtime';
YValues.Name := 'Y';
YValues.ValueSource :='Database_Increase';
end;
end;
这样可以动态创建dbchart,XValues.ValueSource 就是要显示的x轴的数据集,YValues.ValueSource 就是要显示的y轴的数据集,'System_Nowtime','Database_Increase'都是数据库一个表中的两个字段