怎么设定chart横轴设为日期?内详,,,,,(100分)

  • 主题发起人 主题发起人 baifeng
  • 开始时间 开始时间
B

baifeng

Unregistered / Unconfirmed
GUEST, unregistred user!
看了TeeChart demo中CrossHairForm窗体中的chart可以,
我试了好多次都不行?
 
要用日期做横轴,可以使用手工加入数据来实现
 
要做加个段就行了
 
SOS!!!!!!!!!十万火急!!!!如何实现动态建立SERIES,同时改变形状。如折线,饼形
参考这个讨论里的内容,可以自己写代码控制的。自己去看,不懂再回来问。
 
TAreaSeries
TBarSeries
TCircledSeries
TCustomBarSeries
TCustomSeries
TFastLineSeries
THorizBarSeries
TLineSeries
TPieSeries
TPointSeries
TSeriesPointer
总共有11个SERIES可供选择。
创建一个FORM,放DBCHART组件,TABLE组件,两个按钮。TABLE组件连接表,当然你也可以用QUERY等。
看以下例子:
procedure TForm1.Button1Click(Sender: TObject);// 曲线
var myseries:TLineSeries;
begin
dbchart2.SeriesList.Clear;
myseries:= TLineSeries.Create(self);
myseries.ParentChart:=dbchart2;
myseries.DataSource:=table1;
myseries.XValues.ValueSource:='yf';
myseries.YValues.ValueSource:='gz';
end;

procedure TForm1.Button2Click(Sender: TObject);// 柱状
var myseries:TBarSeries;
begin
dbchart2.SeriesList.Clear;
myseries:= TBarSeries.Create(self);
myseries.ParentChart:=dbchart2;
myseries.DataSource:=table1;
myseries.XValues.ValueSource:='yf';
myseries.YValues.ValueSource:='gz';
end;
其他的,看了这个,原理是一样的。
 
chart.serieslist.add(valuearray,日期array,clteecolor);
 
示例:
lineseries1.XLabelsSource:=''
lineseries1.Xvalues.valuesource:=datefieldname //必须有日期或数字型字段
lineseries1.Xvalues.valuesource:=fieldname;
如有多个字段,则两条曲线
lineseries2.XLabelsSource:=''
lineseries2.Xvalues.valuesource:=datefieldname //必须有日期或数字型字段
lineseries2.Xvalues.valuesource:=fieldname;
 
后退
顶部