Delphi中DBChart的应用

2016-08-22 10:23:38来源:http://kaixinbuliao.blog.51cto.com/2567365/1316250作者:鹅倌人点击


Delphi中DBChart的应用:1.绑定数据ADOQuery1.Active:=True;DBChart1.Series[0].DataSource:=ADOQuery1;DBChart1.Series[0].XLabelSource:='FiledName';DBChart1.Series[0].YValues.ValueSource:='FieldName';2.切换图表类型tmpChart:=DBChart1.Series[0];ChangeSeriesType(tmp,TLineSeries);tmpChart.Active:=True;tmpChart.RefreshSeries;3.设置分页DBChart1.ScaleLastPage:=true;DBChart1.MaxPointsPerPage:=10;DBChart1.Page:=1;DBChart1.PreviousPage;DBChart1.NextPage;DBChart1.Page:=NumPages;4.导出图表SaveToBitmapFile(FileName);5.打印图表uses TeePrevi;ChartPreview(Parent,DBChart1);TeePreview(Parent,DBChart1);6.数据源ADODataSet1.CreateDataSet;AdoDataSet1.Insert;AdoDataSet1.FieldByName('Value').AsFloat:=200000;AdoDataSet1.FieldByName('Info').AsString:='05-02';AdoDataSet1.Post;


最新文章

123

最新摄影

微信扫一扫

第七城市微信公众平台