delphi 中用dbchart怎么做数据统计，网上看了很多帖子，但发现还是不大好理解，请告诉我控件里的操作

Posted 2023-05-16

比如说staff是个员工表，有性别属性sex，想做一个饼图或者柱形图，饼图表现的是性别比例，柱形图表示的是男女分别的人数，求高手解析控件里的操作和代码的编写，求完整

参考技术A 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;
追问

这个貌似我也看过，我的问题应该怎么套进这个模板来

参考技术B 右击控件边框选择“属性”在movie后的文本框中输入flash文件的完整路径，扩展名为.swf本回答被提问者采纳

怎么把宝塔的MySQL数据库做外网映射

明确mysql数据库内网访问地址端口，确保mysql数据库服务正常，在内网可以正常访问连接。如我本机mysql数据库访问地址是localhost:3306。如何实现外网访问内网mysql数据库？内网使用nat123动态域名解析。内网服务器安装nat123客户端，并使用它。如何实现外网访问内网mysql数据库？用自己的帐号登录。如没有帐号，“注册帐号”进入网站进行注册帐号。如何实现外网访问内网mysql数据库？进入主面板/域名解析列表/添加域名。如何实现外网访问内网mysql数据库？选择动态域名解析记录，使用免费二级域名，或自己的域名。鼠标放在输入框有向导提示。如何实现外网访问内网mysql数据库？加动态解析后，在域名解析列表中查看当着解析状态。动态解析域名与本地公网IP保持对应。如何实现外网访问内网mysql数据库？路由器端口映射，路由映射mysql数据库访问端口。因为公网IP是在路由器上的，外网访问时，需要经过路由，需要在路由器上做端口映射，将内网mysql数据库访问端口打通。路由器端口映射位置：转发规则/虚拟服务器/添加允许外网访问端口和协议。我的mysql数据库端口是默认的3306，我内网对应mysql数据库主机的内网IP地址是192.168.1.22。如何实现外网访问内网mysql数据库？外网访问时，使用动态解析域名。在外网访问mysql数据库时，使用动态解析域名进行连接访问。域名是不变的，可以上网即可访问，再也不担心动态公网IP变化的问题。

参考技术A 最简单的方法是下载一个花生壳，就可以实现内网映射了；