个人理财.docx

1、个人理财 生产实习报告 摘 要 每个人在日常生活及投资活动中,都希望对自己的收入和支出做到心里有数,从记录的信息中可以看到主要消费方向,通过相应的调整,以便制定出适合自身的一套理财计划,达到合理的经济统筹。此外,传统的将余钱存入银行的方式已经不再适合现代经济发展了,投资已经成为现代人累积财富的主要方式。理财行为就是利用现有的具体,及时的信息,通过提供的合理选择,找出代价最少、收益最大的理财方式让有限的资源得以发挥最大的功用。个人理财系统的设计旨在帮助以家庭为单位的人群找到合理的规划资金的方式,做到方便,快捷,有效的进行理财操作。关键词 Delphi7. 0;Access数据库目 录摘 要 I第

2、1章 绪论 11.1 生产实习目的 11.2 生产实习意义 21.3 生产实习内容概述 21.3.1 课题内容概述 21.3.2 课题实现概述 2第2章 软件实现 82.1开发工具以及相关技术简介 82.1.1 Delphi简介 82.1.2 Access数据库简介 82.2 需求分析 92.2.1 可行性分析 92.2.2 目标 92.2.3 综合分析 102.3 总体设计 102.3.1 系统说明 102.3.2 数据库设计 112.3.3 数据库表的设计 122.4详细设计 142.4.1 创建登录模块 142.4.2 创建欢迎窗体 162.4.3 创建个人财务主窗体 175.4.4 创

3、建数据模块 195.4.5 创建系统管理模块 215.5 实现 255.5.1 登录模块 255.5.2系统管理模块 265.5.3 收支管理模块 275.5.4 资产管理模块 28总结与感受 29参考文献 30第1章 绪论1.1 生产实习目的生产实习的目的是计算机科学与技术专业本科生教学的必要环节，是学生走向工作岗位、研究岗位之前的一次综合性实习，是对所学理论知识的一次初步的综合考核。 我选择的题目是“个人财务管理系统”，拥有的功能是对个人财务信息(包括现金和固定物品)进行管理，可对每天收支情况进行管理和查询，统计每月的收支情况。报告中包含了我进行设计，编码，实现，调试运行的详细操作和步骤。

4、这次开发经验让我掌握计算机系统工程与技术的原理、发展以及一些基本的应用，把所学知识与解决实际问题相联系，培养了我发现问题、分析问题和解决问题的能力，从而提高了从事实际工作的能力。1.2 生产实习意义随着经济的发展,理财意识逐渐深入人心,如何将一个家庭的财务状况及时合理的记载下来就显得尤为重要了。本文设计了一个基于DELPH I的个人理财系统,满足用户进行日常理财的需求,对用户的收支及资产进行管理。该系统使用后,方便了用户,使其对以家庭为单位的收入及投资情况一目了然。1.3 生产实习内容概述1.3.1 课题内容概述个人财务系统主要面对广大用户，只要下载本软件就可以使用。主要包括系统管理模块、收支

5、管理模块、资产管理模块三项内容，实现了个人收支以及财务的科学管理。1.3.2 课题实现概述本系统是以Object Passcal语言为基础，使用Delphi编写操作界面，ADO组件实现数据库的链接，Access作为数据库服务器的应用系统。第2章 软件实现2.1开发工具以及相关技术简介2.1.1 Delphi简介Delphi是Borland公司推出的一种可视化的,方便快捷的Windows应用程序开发工具,既具备VB 编程的方便性,又具有VC的强大功能和高效性,为越来越多的程序开发用户所青睐。其主要特点如下: 1. 32位本地代码编译器,产生的可执行文件是独立的,不需要链接运行时的解释器dll.2

6、. 采用3层数据管理模式(数据层、对象层、应用程序层) ,把诸如数据模型、业务规则、窗体、对象等集中存储在对象存储库中.3. 其数据库感知功能可使用户在开发应用程序时就可看到数据库的动态变化.4. 为了便于维护程序,Delphi将数据访问与业务规则从程序中分离出来,集中存储在数据模型对象中,当业务规则需要修改时,只需在数据模型级进行修改。程序运行调用这些数据模型时修改的结果会自动反映在应用程序中。2.1.2 Access数据库简介Microsoft Office Access是由微软发布的关联式数据库管理系统。它结合了 Microsoft Jet Database Engine 和图形用户界面

7、两项特点，是 Microsoft Office 的系统程式之一。Access能够存取 Access/Jet、Microsoft SQL Server、Oracle，或者任何ODBC兼容数据库内的资料。熟练的软件设计师和资料分析师利用它来开发应用软件，而一些不熟练的程序员和非程序员的紧接用户则能使用它来开发简单的应用软件。虽然它支持部份面向对象技术，但是未能成为一种完整的面向对象开发工具。2.2 需求分析2.2.1 可行性分析个人理财是在综合分析客户的投资目的、资产状况、风险承受能力以及个人偏好的情况下,对个人(家庭)的财产进行科学的、有计划的、系统的全方位管理,以实现个人(家庭)财产的合理安排

8、、消费和使用。1. 个人投资者的需求。随着经济的发展,个人可支配收入不断增长,其资产的增加必然产生对资产保值和增值的需要。2. 金融机构的需求。虽然现在国内贷款需求十分旺盛,但不良贷款居高难下,优良客户的贷款营销空间已显现相对不足,金融企业之间的激烈竞争使得利润空间越来越小。发展个人理财业务不但可以增加盈利而且还可以分散、降低运营风险,有利于改善银行的资产、客户和收益结构,转变银行的经济增长方式。3. 国民经济稳定发展的需要。个人理财业务的发展可以促进社会储蓄向投资的转化,促进经济发展。综上所述,个人理财业务有巨大的潜在市场需求,那么,开发一个合适的个人理财系统就非常重要了。2.2.2 目标

9、随着科技进步和计算机网络的飞速发展，人类已开始步入了信息社会,因而人们的生活方式、工作方式都将随之而改变。越来越多的人开始注重理财，各种各样的个人理财软件也应运而生。本系统主要包括功能：（1）对个人财务信息(包括现金和固定物品)进行管理；（2）可对每天收支情况进行管理和查询；（3）统计每月的收支情况。2.2.3 综合分析1. 性能需求 操作系统：Windows 2000/Windows XP/Windows 7系统。 接口需求：用户使用输入框和按钮进行操作，通过ADO组件连接Access数据库进行添加、修改、删除、查询等操作。 将来可能提出的要求：能及时连接互联网进行数据库的更新操作。2. 数

10、据需求 用户通过已有的账号、密码登录，连接数据库显示已有的数据内容，并在原有的基础上实现数据的增减查找；或者注册新账号，添加新的数据进去。 在主窗口中选择相对应的需要操作的内容，点击进入相应的子窗口，在子窗口中实现模块提供的添加、修改、删除、查找等功能。2.3 总体设计2.3.1 系统说明图5-1 个人财务系统功能图 系统运行时，先进行用户登录，登录成功后启动欢迎窗体，然后进入主界面，主界面上方的菜单用来打开其他功能窗体，包括系统管理模块、收支管理模块、资产管理模块、关于窗体。2.3.2 数据库设计数据库一共设计了四个表，分别登录信息、收支管理、现金和固定资产管理表。对登录信息表中存储编号、账

11、号、密码，能对表进行添加、修改、删除的功能。对收支管理表中存储账号、项目、金额、类型、日期、备注，能进行添加、修改、删除、查询、统计的操作。现金和固定资产管理表中分别存储账号、日期、金额、用途和名称、规格、单位、登记时间，能进行添加、修改、删除的操作。1 .登录信息表表如下：图5-2 登录信息2.收支管理表如下：图5-3 收支管理3.现金和固定资产表如下：图5-4 现金图5-5 固定资产2.3.3 数据库表的设计1.登录信息介绍：这个模块存储了用户需要输入的信息，包括账号、密码，并对其进行添加、修改、删除、查询的操作。表5-1 登录信息表字段名描述类型长度空是否主键ID编号Int否是UserN

12、ame账号varchar50否否Password密码varchar50否否2. 收支管理介绍：这个模块存储了用户的账号、项目、金额、类型、日期、备注，可以对其进行添加、修改、删除、查询、统计的操作。表5-2 收支管理信息表字段名描述类型长度空是否主键UserName账号Char50否是Program项目Char50否否Cash金额Int 否否Class类型Char50否否Date日期Int否否Memo备注Char50否否3. 现金及固定资产介绍：这个模块分别存储账号、日期、金额、用途和名称、规格、单位、登记时间，能进行添加、修改、删除的操作。表5-3 现金及固定资产信息表字段名描述类型长度空是

13、否主键UserName账号Char50否是Date日期Int否否Cash金额Int 否否Use用途Char50否否Wp物品Char50否否Gg规格Char50否否Dw单位Char50否否2.4详细设计2.4.1 创建登录模块1.界面设计表5-4 Login窗体主要组件说明组件名称属性设置说明TFormLogDlgCaption：登录BorderStyle：bsDialog显示登录窗体TEditedtAccountText：空输入账号TEditedtPasswordText：空输入密码TLabelIblAccountCaption：账号（&U）FocusControl：edtAccountTLa

14、belIblPasswordCaption：密码（&P）FocusControl：edtPasswordTButtonbtnOKDefault：True确定输入信息，验证TButtonbtnCancelModalResult：mrCancel取消登录2. 代码实现(1)声明窗体函数在登录窗体中，需要提供两个方法，一个是提供从外部调用登录窗体的Execute类方法，另一个是验证用户是否合法的VerifyAccount方法，具体声明如下：Publicclass function Execute:Boolean;function VerifyAccount:Boolean;(2)实现Execute方

15、法class function TLoginDlg.Execute:Boolean;begin with TLoginDlg.Create(nil)do try Result:=ShowModal=mrOK; finally Free; end;end;(3)实现VerifyAccount方法function TLoginDlg.VerifyAccount:Boolean;begin Result:=False; with adoqUser dobegin Parameters.ParamByName(UserName).Value:=edtAccount.Text; Parameters.P

16、aramByName(Password).Value:=edtPassword.Text; if Active then Close; Open; if RecordCount0 then ModalResult:=mrOK; end; Result:=ModalResult=mrOK;end;(4)btnOK按钮的OnClick事件procedure TLoginDlg.btnOKClick(Sender: TObject);begin if not VerifyAccount then ShowMessage(账号或密码错误，请重新输入！);end;2.4.2 创建欢迎窗体1.界面设计表5

17、-5 SplanshForm窗体主要组件说明组件名称属性设置说明TFormSplanshFormCaption： BorderStyle：bsNoneBorderIcons：TImageingSplashAutoSize：TrueTTimermtSplashInterval定时1500毫秒2. 代码实现 欢迎窗体代码中包含了Form的Create事件、Show事件以及imgSplash的MouseUp事件和mtSplash的OnTimer事件。(1)FormCreate事件中主要调入欢迎窗体的显示图片，并为属性TimeOut的赋初值False。(2)FormShow事件中主要是调整窗体的显示位

18、置，让其显示整个屏幕的中央。(3)imgSplash的MouseUp事件是当用户鼠标单击欢迎界面的图片时，将TimeOut属性是值赋为True，即窗体可以关闭。(4)mtSplash的OnTimer事件在到该组件的Interval属性设置的时间时，同样赋TimeOut属性的值为True，也就是不对欢迎窗体做任何操作，一旦到指定的时间，窗体也可以关闭。Splash窗体的代码如下：procedure TSplashForm.tmSplashTimer(Sender: TObject);begin FTimeOut := True; end;procedure TSplashForm.imgSpla

19、shMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);begin FTimeOut := True;end;procedure TSplashForm.FormCreate(Sender: TObject);begin imgSplash.Picture.LoadFromFile(systemPath + conSplashFile); FTimeOut := False;end;procedure TSplashForm.FormShow(Sender: TObject);beg

20、in Left := (Screen.Width - Width) div 2; Top := (Screen.Height - Height) div 2; end;end.2.4.3 创建个人财务主窗体1.界面设计表5-6 MainForm主窗体组件说明组件名称属性设置说明TFormMainFormCaption：个人财务系统BorderStyle：fsMDIFormMDI窗体TActionManageramMainTActionToolBaratbMainActMainionManager：amMainCaption：关联的ActionManager为amMain2 代码实现除了创建和释

21、放数据模块之外，主窗体还包括了调用各功能窗体的代码。下面分别对它们进行介绍。(1)主窗体的OnCreate事件在主窗体的OnCreate事件中，主要实现数据模块的创建。代码如下：procedure TMainForm.FormCreate(Sender:TObject);begin FdmGrcw:=TdmGrcw.Create(self);end;(2)主窗体的OnDestroy事件在主窗体的OnDestroy事件中，主要实现数据模块的释放，这与主窗体的OnCreate事件中创建数据模块是相对应的。代码如下：procedure TMainForm.FormDestroy(Sender:TOb

22、ject);begin FdmGrcw:=nil;end;(3)acSysterm的OnExecute事件 在acSysterm的OnExecute事件中，主要实现对系统管理模块窗体的调用，由于系统管理模块窗体是一个MDI子窗体，因此事先需要判断它是否以及创建。代码如下：procedure TMainForm.acSystermExecute(Sender: TObject);begin if not Assigned(Log) then Log :=Log.Create(Self, FdmGrcw); Log.Show;end;(4)acInput的OnExecute事件 在acInput的

23、OnExecute事件中，主要实现对收支管理模块窗体的调用，由于收支管理模块窗体是一个MDI子窗体，因此事先需要判断它是否以及创建。代码如下：procedure TMainForm.acInputExecute(Sender: TObject);begin if not Assigned(Salary) then Input:=Salary.Create(Self.FdmGrcw); Salary.Show;end;(5)acPossession的OnExecute事件 在acPossessiont的OnExecute事件中，主要实现对资产管理模块窗体的调用，由于资产管理模块窗体是一个MDI子

24、窗体，因此事先需要判断它是否以及创建。代码如下：procedure TMainForm.acPossessionExecute(Sender: TObject);begin if not Assigned(Possession) then Possession:=Possession.Create(Self.FdmGrcw); Possession.Show;end;(6)acAbout的OnExecute事件 在acAbout的OnExecute事件中，主要实现对关于窗体的调用，关于窗体以模态方式显示。代码如下：procedure TMainForm.acAboutExecute(Sende

25、r: TObject);begin with TAbout.Create(self) do try ShowModal; finally Free; end;end;2.4.4 创建数据模块1.界面设计表5-7 dmGrcw数据组件说明组件名称属性设置说明ADOConnectionadocGrcwConnectionString：Provider=Microsoft.Jet.OLEDB.4.0;Data Source=gerencaiwu.mdb;LogibPrompt:False连接字符串不打开登录框使用OLE DB方式连接数据库TADOTableradotDlxxConnection:ad

26、ocGrcwTableName:登录信息数据库连接为adocGrcw数据库表为登录信息TADOTableradotSzglConnection:adocGrcwTableName:收支管理数据库连接为adocGrcw数据库表为收支管理TADOTableradotXjConnection:adocGrcwTableName:现金数据库连接为adocGrcw数据库表为现金TADOTableradotGdzcConnection:adocGrcwTableName:固定资产数据库连接为adocGrcw数据库表为固定资产2. 代码实现dmGrcw数据模块主要是在其OnCreate事件中实现与数据库的连

27、接。代码如下：procedure TdmGrcw.DataModuleCreate(Sender:TObject);var I_File:string;begin inherited; I_ File :=DataPath+conGRCWDataFile; if not FileExists(I_File) then ShowMessage(文件不存在！无法打开数据库！)； with adocGrcw do begin ConectionString:=CNT_ConnectString; ConectionString:=Format(ConnectionString,I_File); Co

28、nnected:=True; end;end;2.4.5 创建系统管理模块1.界面设计表5-8 Log窗体主要组件说明组件名称属性设置说明TFormLogCaption：系统管理模块FormStyle：fsMDIChildMDI窗体TButtonbtAddAction:acAddCaption：添加关联Action为 acAddTButtonbtEditAction:acEditCaption：修改关联Action为acEditTButtonbtDelAction:acDelCaption：删除关联Action为acDelTButtonbtBrowseAction:acBrowseCaptio

29、n：查看关联Action为acBrowseTButtonbtExitAction:acExitCaption：退出关联Action为acExitTDataSourcedsGrcwTDBGriddbGrcwAlign:alClientDataSource：dsGrcwOptions.dgEditing:FslseReadOnly:True关联数据源DataSource是dsGrcwGrid只读TActinListalGrcw2. 代码实现系统管理窗体中主要包括了用户账户、密码的添加、修改、删除、查看、退出的实现代码，另外还包括对DBGrid显示的处理等代码。(1)窗体的Create事件代码中对Form的Create事件进行了重构，声明如下：publicconstructor Create(AOwner:TComponent;AdmGrcw:TdmGrcw);reintrod