那位朋友有关于Tdbchart 的详资料。帮帮忙!!!
解决方案 »
- 请教:如何导出EXCEL格式的DBF文件
- DELPHI7 安装INDY9出现问题
- 进销存财务一体化管理软件
- 急救,对我来说是个大难题,高手是小CASE。
- 求教:WinSkinForm控件安装问题!!
- 请问这个函数为什么不能通过编译
- 初学者的初级问题:如何实现简单的拖动操作?
- 关于保存文件(二进制方式)问题,急,急 ,急,求救,
- 有谁会用Vectordraw控件 @ Delphi7 付费开发。
- 在Delphi下有没有SAX控件?如何用?
- 大清早一来就发现收藏夹被clear了....
- 上一次问的问题,网页出错,回复看不全,只好从问:请问:如何将Doc文档存入到Sql Server数据库Image字段中,并读取出来?
procedure tchartform.getbar(x,y:string);
var series1:tbarseries;
begin
series1:=tbarseries.Create(self);
series1.ParentChart:=dbchart1;
series1.DataSource:=dbset;
series1.XLabelsSource:=x;
series1.yValues.ValueSource:=y;
series1.Title:=x;
// series1.XLabelsSource:
series1.Active:=true;
dbchart1.BottomAxis.Title.caption:=x;
dbchart1.leftAxis.Title.caption:=y;
dbchart1.leftAxis.Title.Angle:=0;
end;procedure tchartform.getpie(x,y:string);
var series1:tpieseries;
i:integer;
begin
series1:=tpieseries.Create(self);
series1.ParentChart:=dbchart1;
series1.DataSource:=dbset;
series1.PieValues.ValueSource:=x;
series1.XLabelsSource:=y;
// for i:=1 to series1.Labels.Count do
// series1.Labels.Items[i]:=
// series1.PieValues.Sort;
// series1.yValues.ValueSource:=y; dbchart1.Title.Text.Text:=datfm.caption;
series1.Active:=true;
end;
其中有的变量你猜都猜得出来是什么,比如dbset就是一个tdataset