Question

delphi控件问题

1.谁能例举一个DBchart控件的例子，简单一点能让初学者看懂的例子。
2.利用delphi制作一个能把excel表格里的数据转到数据库里的软件，请教高手，设计这个软件是思路是怎样的？如何写代码？

Answer 1

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);

６.数据源
ADODataSet1.CreateDataSet;
AdoDataSet1.Insert;
AdoDataSet1.FieldByName('Value').AsFloat:=200000;
AdoDataSet1.FieldByName('Info').AsString:='05-02';
AdoDataSet1.Post;
excel就是一个数据库...你用ado odbc连接上 sheet1表里根据字段 insert into到数据库表就行啦