基于Delphi的身高与体重模型重点分析.doc

基于Delphi的身高与体重模型分析 一、概述 本文通过对一个人从小到大的身高好体重数据，建立模型，运用Delphi7软件对此人的身高和体重数据进行模型估计；分别进行了一元线性回归和指数回归分析，计算出回归系数和均方差。并利用得出的回归系数预测其体重的未来趋势。利用Delphi7实现了向StringGrid导入数据、清空数据、删除某一单元数据以及向某一单元写入数据的功能，并实现了回归分析、预测和绘制关系图的功能，最后实现把绘制的关系图导入到word中来。 二、需求与功能分析 1、需求 利用Delphi完成如下功能： 1) 能够录入身高与体重数据并具有图形录入的界面； 2) 提供一元回归分析； 3）预测未来趋势； 4）绘制身高与体重的关系图； 5) 图形能够导入到word中。 2、功能分析 根据需求，首先学习Delphi的基本语法和窗口知识，为功能设计打下基础，然后根据需求对各个模块进行设计： 1）录入功能和图形界面 ★ 向界面中加入StringGrid1组件（负责数据存储），若干Edit组件、Button组件 ★ 两个Edit组件进行身高和体重的录入 ★ 实现Edit向StringGrid1导入数据，清空StringGrid1中的数据， ★ 对StringGrid1中的单元进行写入和删除等功能 ★ 把StringGrid1中的数据导出和导入功能 2）一元回归分析和预测功能 一元回归分析有线性回归和非线性回归两种，本程序采用一元线性回归和非线性回归中的典型回归方法指数回归进行回归分析 ★一元线性回归原理 一元线性回归是描述两个变量之间线性相关关系的最简单的回归模型。 公式为： 其中a和b为回归系数 为了计算方便，以误差的平方和最小为标准确定回归模型： 利用Q对a和b作微分： 令微分方程为零（使总误差最小），解方程组得到a和b的计算式： ★ 指数回归原理 指数回归属于非线性回归，其模型为： ，a和b为回归系数，一般情况下，非线性回归都会转换成线性回归进行运算， 对公式两边取对数得到 ，令 可以利用前面描述的线性回归方法进行计算。 因此，对此功能的设计如下： ★ 加入一个RadioGroup组件、button组件以及Edit组件若干 ★ 利用RadioGroup组件的item实现对回归方法的选择，并实现回归功能，把回归系数和均方差显示在Edit组件中 ★ 预测功能是在回归分析的基础上，输入身高值，对体重进行预测分析。 3）绘制功能 针对前期在StringGrid中保存的数据和对其进行的回归分析，对原始数据和回归分析，分别绘制关系图，以便于进行后期对比分析： ★ 加入Tchart组件、CheckListBox组件和button组件 ★ 在Tchart组件中加入三个Series组件以便于绘制原始曲线以及一元线性回归和指数回归曲线 ★ 利用CheckListBox组件来确定对哪条曲线进行绘制。 4）向Word中导入图形 此功能需要把Tchart中的数据导入到Word中，首先需要把Tchart的曲线存储成为位图，然后根据TImage组件完成Word的导入 ★ 加入WordAppliaction、WordDocument以及button组件； ★ 在WordApplication中需要实现对Word的连接判定； ★ 在WordDocument组件中完成对Image图像的导入、存储和粘贴。 根据以上分析，得到总体的图形录入界面： 三、模块设计与功能 根据以上功能分析将此程序分为四大模块：StringGrid控制模块；回归分析和预测模块；绘制曲线模块以及向Word输出模块 1、StringGrid控制模块 主要功能有向StringGrid1导入数据（导入）、StringGrid1清空（清空）、删除StringGrid1某单元数据（删除）、向StringGrid某单元输入数据（写入）以及保存StringGrid1为文本文档（保存表格）和把文本文档导入到StringGrid1中（导入表格）； 1）导入 主要功能：录入身高和体重信息，身高的标准单位为cm，体重的标准单位为kg； 其实现代码如下： procedure TForm1.OnButton1Click(Sender: TObject); //录入身高和体重数据 begin if (rowStringGrid1.RowCount) then begin StringGrid1.Cells[1,1]:=身高(cm); //第一行输出标题：身高和体重 StringGrid1.Cells[2,1]:=体重(kg); StringGrid1.Cells[1,row]:= Edit1.Text; //第一列存储