dbchart倒底如何用(50分)

  • 主题发起人 主题发起人 wchal
  • 开始时间 开始时间
W

wchal

Unregistered / Unconfirmed
GUEST, unregistred user!
哪里有教材?
急啊!
如:如何預覽?如何在運行中指定表?如何在運行中設定Labels.....
 
http://www.powerba.com/develop/web/asp/article/20010417001.htm
TeeChart控件的应用
有一篇文章,不算很详细,但讲得也还算可以,看看吧
 
怎麼沒有人回答啊[:(]
 
dbchart还是蛮简单的,拖一个dbchart1,0双击它,设置Series-->>Data Source里面
将横向的字段和纵向的字段设置好就行了。
设置时多试试就知道了,主要是这里,其他就是显示的问题
 
Data Source里面横向的字段和纵向的字段设置好就行了。
但是我要在運行期設定要如何做?
 
我顶..............
呀!好累啊!
 
关于DBChart的使用,建议还是看delphi的memo吧:
运行期设置数据源???
这是我用的一段程序,是动态创建的条形图(而且是多个,当然字段设置也是动态的)
procedure TForm_Zdsyfx.Radio_BarClick(Sender: TObject);
var
I:Integer;
Series_BarAdd:Array Of TBarSeries;//条形图
begin
if not Table_Dnqsfx.Active then
Exit ;
SetLength(Series_BarAdd,Table_Dnqsfx.FieldCount-1);//根据table_dnqsfx(一个table数据集)的字段数量设置分析图的个数
DBChart3.FreeAllSeries ;//释放dbchart里所有的series;
For I:=0 To Table_Dnqsfx.FieldCount-2do
begin
Series_BarAdd:=TBarSeries.Create(DBChart3);//建立series
With Series_BarAdddo
begin
ParentChart:=DBChart3;
Marks.Visible:=False ;
//这下面就是动态给数据源和分析字段了
DataSource:=Table_Dnqsfx;
XLabelsSource:='Rq';
YValues.ValueSource:=Table_Dnqsfx.Fields[I+1].FieldName;
Title:='2'+Copy(Table_Dnqsfx.Fields[I+1].FieldName,2,3)+'年' ;
End ;
End ;
DBChart3.Legend.
LegendStyle:=lsSeries;
DBChart3.Repaint ;//重画
end;
 
有没有简单的方法啊
 
这个问题很久了即然一直没有结果,再顶一次
 
hongxing_dl的问题是:当Series设置为横向显示数据时就不能实现了,谁知道解决办法吗?
 
这个问题我也遇到过,
 
begin
with data.ADOQuery2do
begin
close;
sql.Clear;
sql.Add('select bmmc as 部门名称,sum(rjhz) as 累计计划值,sum(rsjz) as 累计实际值,sum(rbjz) as 累计报局值 from cx_clrb where date>='''+formatdatetime('yyyy-mm-dd',dtp_qs.Date)+''' and date<='''+formatdatetime('yyyy-mm-dd',dtp_js.Date)+''' and bmlb=01 group by bmmc');
open;
end;
series1.DataSource:=data.ADOQuery2;
Series1.XLabelsSource := data.ADOQuery2.Fields[0].fieldname;
Series1.YValues.ValueSource := data.ADOQuery2.Fields[2].fieldname;
end;
是这个意思吗?
 
根据查询结果的不同,得出一个不同的饼图,不知道我的方法是否合适,但是已经实现了
 
TO:zangcb
你的方法可以实现根据查询结果不同得出不同的分析图。
但是还有一个问题啊:如何預覽?
搞定马上散分!
先谢了!
 

Similar threads

回复
0
查看
999
不得闲
回复
0
查看
881
不得闲
S
回复
0
查看
1K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
922
SUNSTONE的Delphi笔记
S
后退
顶部