个人理财.docx
《个人理财.docx》由会员分享，可在线阅读，更多相关《个人理财.docx（23页珍藏版）》请在冰豆网上搜索。
个人理财
生产实习报告
摘要
每个人在日常生活及投资活动中,都希望对自己的收入和支出做到心里有数,从记录的信息中可以看到主要消费方向,通过相应的调整,以便制定出适合自身的一套理财计划,达到合理的经济统筹。
此外,传统的将余钱存入银行的方式已经不再适合现代经济发展了,投资已经成为现代人累积财富的主要方式。
理财行为就是利用现有的具体,及时的信息,通过提供的合理选择,找出代价最少、收益最大的理财方式让有限的资源得以发挥最大的功用。
个人理财系统的设计旨在帮助以家庭为单位的人群找到合理的规划资金的方式,做到方便,快捷,有效的进行理财操作。
关键词Delphi7.0; Access数据库
目录
摘要I
第1章绪论1
1.1生产实习目的1
1.2生产实习意义2
1.3生产实习内容概述2
1.3.1课题内容概述2
1.3.2课题实现概述2
第2章软件实现8
2.1开发工具以及相关技术简介8
2.1.1Delphi简介8
2.1.2Access数据库简介8
2.2需求分析9
2.2.1可行性分析9
2.2.2目标9
2.2.3综合分析10
2.3总体设计10
2.3.1系统说明10
2.3.2数据库设计11
2.3.3数据库表的设计12
2.4详细设计14
2.4.1创建登录模块14
2.4.2创建欢迎窗体16
2.4.3创建个人财务主窗体17
5.4.4创建数据模块19
5.4.5创建系统管理模块21
5.5实现25
5.5.1登录模块25
5.5.2系统管理模块26
5.5.3收支管理模块27
5.5.4资产管理模块28
总结与感受29
参考文献30
第1章绪论
1.1生产实习目的
生产实习的目的是计算机科学与技术专业本科生教学的必要环节，是学生走向工作岗位、研究岗位之前的一次综合性实习，是对所学理论知识的一次初步的综合考核。
我选择的题目是“个人财务管理系统”，拥有的功能是对个人财务信息（包括现金和固定物品）进行管理，可对每天收支情况进行管理和查询，统计每月的收支情况。
报告中包含了我进行设计，编码，实现，调试运行的详细操作和步骤。
这次开发经验让我掌握计算机系统工程与技术的原理、发展以及一些基本的应用，把所学知识与解决实际问题相联系，培养了我发现问题、分析问题和解决问题的能力，从而提高了从事实际工作的能力。
1.2生产实习意义
随着经济的发展,理财意识逐渐深入人心,如何将一个家庭的财务状况及时合理的记载下来就显得尤为重要了。
本文设计了一个基于DELPHI的个人理财系统,满足用户进行日常理财的需求,对用户的收支及资产进行管理。
该系统使用后,方便了用户,使其对以家庭为单位的收入及投资情况一目了然。
1.3生产实习内容概述
1.3.1课题内容概述
个人财务系统主要面对广大用户，只要下载本软件就可以使用。
主要包括系统管理模块、收支管理模块、资产管理模块三项内容，实现了个人收支以及财务的科学管理。
1.3.2课题实现概述
本系统是以ObjectPasscal语言为基础，使用Delphi编写操作界面，ADO组件实现数据库的链接，Access作为数据库服务器的应用系统。
第2章软件实现
2.1开发工具以及相关技术简介
2.1.1Delphi简介
Delphi是Borland公司推出的一种可视化的,方便快捷的Windows应用程序开发工具,既具备VB编程的方便性,又具有VC的强大功能和高效性,为越来越多的程序开发用户所青睐。
其主要特点如下:
1.32位本地代码编译器,产生的可执行文件是独立的,不需要链接运行时的解释器dll.
2.采用3层数据管理模式（数据层、对象层、应用程序层）,把诸如数据模型、业务规则、窗体、对象等集中存储在对象存储库中.
3.其数据库感知功能可使用户在开发应用程序时就可看到数据库的动态变化.
4.为了便于维护程序,Delphi将数据访问与业务规则从程序中分离出来,集中存储在数据模型对象中,当业务规则需要修改时,只需在数据模型级进行修改。
程序运行调用这些数据模型时修改的结果会自动反映在应用程序中。
2.1.2Access数据库简介
MicrosoftOfficeAccess是由微软发布的关联式数据库管理系统。
它结合了MicrosoftJetDatabaseEngine和 图形用户界面两项特点，是MicrosoftOffice的系统程式之一。
Access能够存取Access/Jet、MicrosoftSQLServer、Oracle，或者任何 ODBC 兼容数据库内的资料。
熟练的软件设计师和资料分析师利用它来开发应用软件，而一些不熟练的程序员和非程序员的"紧接用户"则能使用它来开发简单的应用软件。
虽然它支持部份面向对象技术，但是未能成为一种完整的面向对象开发工具。
2.2需求分析
2.2.1可行性分析
个人理财是在综合分析客户的投资目的、资产状况、风险承受能力以及个人偏好的情况下,对个人（家庭）的财产进行科学的、有计划的、系统的全方位管理,以实现个人（家庭）财产的合理安排、消费和使用。
1.个人投资者的需求。
随着经济的发展,个人可支配收入不断增长,其资产的增加必然产生对资产保值和增值的需要。
2.金融机构的需求。
虽然现在国内贷款需求十分旺盛,但不良贷款居高难下,优良客户的贷款营销空间已显现相对不足,金融企业之间的激烈竞争使得利润空间越来越小。
发展个人理财业务不但可以增加盈利而且还可以分散、降低运营风险,有利于改善银行的资产、客户和收益结构,转变银行的经济增长方式。
3.国民经济稳定发展的需要。
个人理财业务的发展可以促进社会
储蓄向投资的转化,促进经济发展。
综上所述,个人理财业务有巨大的潜在市场需求,那么,开发一个合适的个人理财系统就非常重要了。
2.2.2目标
◆随着科技进步和计算机网络的飞速发展，人类已开始步入了信息社会,因而人们的生活方式、工作方式都将随之而改变。
越来越多的人开始注重理财，各种各样的个人理财软件也应运而生。
本系统主要包括功能：
（1）对个人财务信息（包括现金和固定物品）进行管理；
（2）可对每天收支情况进行管理和查询；
（3）统计每月的收支情况。
2.2.3综合分析
1.性能需求
◆操作系统：
Windows2000/WindowsXP/Windows7系统。
◆接口需求：
用户使用输入框和按钮进行操作，通过ADO组件连接Access数据库进行添加、修改、删除、查询等操作。
◆将来可能提出的要求：
能及时连接互联网进行数据库的更新操作。
2.数据需求
◆用户通过已有的账号、密码登录，连接数据库显示已有的数据内容，并在原有的基础上实现数据的增减查找；或者注册新账号，添加新的数据进去。
◆在主窗口中选择相对应的需要操作的内容，点击进入相应的子窗口，在子窗口中实现模块提供的添加、修改、删除、查找等功能。
2.3总体设计
2.3.1系统说明
图5-1个人财务系统功能图
系统运行时，先进行用户登录，登录成功后启动欢迎窗体，然后进入主界面，主界面上方的菜单用来打开其他功能窗体，包括系统管理模块、收支管理模块、资产管理模块、关于窗体。
2.3.2数据库设计
数据库一共设计了四个表，分别登录信息、收支管理、现金和固定资产管理表。
对登录信息表中存储编号、账号、密码，能对表进行添加、修改、删除的功能。
对收支管理表中存储账号、项目、金额、类型、日期、备注，能进行添加、修改、删除、查询、统计的操作。
现金和固定资产管理表中分别存储账号、日期、金额、用途和名称、规格、单位、登记时间，能进行添加、修改、删除的操作。
1.登录信息表表如下：
图5-2登录信息
2.收支管理表如下：
图5-3收支管理
3.现金和固定资产表如下：
图5-4现金
图5-5固定资产
2.3.3数据库表的设计
1.登录信息介绍：
这个模块存储了用户需要输入的信息，包括账号、密码，并对其进行添加、修改、删除、查询的操作。
表5-1登录信息表
字段名
描述
类型
长度
空
是否主键
ID
编号
Int
否
是
UserName
账号
varchar
50
否
否
Password
密码
varchar
50
否
否
2.收支管理介绍：
这个模块存储了用户的账号、项目、金额、类型、日期、备注，可以对其进行添加、修改、删除、查询、统计的操作。
表5-2收支管理信息表
字段名
描述
类型
长度
空
是否主键
UserName
账号
Char
50
否
是
Program
项目
Char
50
否
否
Cash
金额
Int
否
否
Class
类型
Char
50
否
否
Date
日期
Int
否
否
Memo
备注
Char
50
否
否
3.现金及固定资产介绍：
这个模块分别存储账号、日期、金额、用途和名称、规格、单位、登记时间，能进行添加、修改、删除的操作。
表5-3现金及固定资产信息表
字段名
描述
类型
长度
空
是否主键
UserName
账号
Char
50
否
是
Date
日期
Int
否
否
Cash
金额
Int
否
否
Use
用途
Char
50
否
否
Wp
物品
Char
50
否
否
Gg
规格
Char
50
否
否
Dw
单位
Char
50
否
否
2.4详细设计
2.4.1创建登录模块
1.界面设计
表5-4Login窗体主要组件说明
组件
名称
属性设置
说明
TForm
LogDlg
Caption：
登录
BorderStyle：
bsDialog
显示登录窗体
TEdit
edtAccount
Text：
空
输入账号
TEdit
edtPassword
Text：
空
输入密码
TLabel
IblAccount
Caption：
账号（&U）
FocusControl：
edtAccount
TLabel
IblPassword
Caption：
密码（&P）
FocusControl：
edtPassword
TButton
btnOK
Default：
True
确定输入信息，验证
TButton
btnCancel
ModalResult：
mrCancel
取消登录
2.代码实现
（1）声明窗体函数
在登录窗体中，需要提供两个方法，一个是提供从外部调用登录窗体的Execute类方法，另一个是验证用户是否合法的VerifyAccount方法，具体声明如下：
Public
classfunctionExecute:
Boolean;
functionVerifyAccount:
Boolean;
（2）实现Execute方法
classfunctionTLoginDlg.Execute:
Boolean;
begin
withTLoginDlg.Create（nil）do
try
Result:
=ShowModal=mrOK;
finally
Free;
end;
end;
（3）实现VerifyAccount方法
functionTLoginDlg.VerifyAccount:
Boolean;
begin
Result:
=False;
withadoqUserdo
begin
Parameters.ParamByName（'UserName'）.Value:
=edtAccount.Text;
Parameters.ParamByName（'Password'）.Value:
=edtPassword.Text;
ifActivethenClose;
Open;
ifRecordCount>0thenModalResult:
=mrOK;
end;
Result:
=ModalResult=mrOK;
end;
（4）btnOK按钮的OnClick事件
procedureTLoginDlg.btnOKClick（Sender:
TObject）;
begin
ifnotVerifyAccountthen
ShowMessage（'账号或密码错误，请重新输入！
'）;
end;
2.4.2创建欢迎窗体
1.界面设计
表5-5SplanshForm窗体主要组件说明
组件
名称
属性设置
说明
TForm
SplanshForm
Caption：
BorderStyle：
bsNone
BorderIcons：
[]
TImage
ingSplash
AutoSize：
True
TTimer
mtSplash
Interval
定时1500毫秒
2.代码实现
欢迎窗体代码中包含了Form的Create事件、Show事件以及imgSplash的MouseUp事件和mtSplash的OnTimer事件。
（1）FormCreate事件中主要调入欢迎窗体的显示图片，并为属性TimeOut的赋初值False。
（2）FormShow事件中主要是调整窗体的显示位置，让其显示整个屏幕的中央。
（3）imgSplash的MouseUp事件是当用户鼠标单击欢迎界面的图片时，将TimeOut属性是值赋为True，即窗体可以关闭。
（4）mtSplash的OnTimer事件在到该组件的Interval属性设置的时间时，同样赋TimeOut属性的值为True，也就是不对欢迎窗体做任何操作，一旦到指定的时间，窗体也可以关闭。
Splash窗体的代码如下：
procedureTSplashForm.tmSplashTimer（Sender:
TObject）;
begin
FTimeOut:
=True;
end;
procedureTSplashForm.imgSplashMouseUp（Sender:
TObject;Button:
TMouseButton;
Shift:
TShiftState;X,Y:
Integer）;
begin
FTimeOut:
=True;
end;
procedureTSplashForm.FormCreate（Sender:
TObject）;
begin
imgSplash.Picture.LoadFromFile（systemPath+conSplashFile）;
FTimeOut:
=False;
end;
procedureTSplashForm.FormShow（Sender:
TObject）;
begin
Left:
=（Screen.Width-Width）div2;
Top:
=（Screen.Height-Height）div2;
end;
end.
2.4.3创建个人财务主窗体
1.界面设计
表5-6MainForm主窗体组件说明
组件
名称
属性设置
说明
TForm
MainForm
Caption：
个人财务系统
BorderStyle：
fsMDIForm
MDI窗体
TActionManager
amMain
TActionToolBar
atbMain
ActMainionManager：
amMain
Caption：
关联的ActionManager为amMain
2代码实现
除了创建和释放数据模块之外，主窗体还包括了调用各功能窗体的代码。
下面分别对它们进行介绍。
（1）主窗体的OnCreate事件
在主窗体的OnCreate事件中，主要实现数据模块的创建。
代码如下：
procedureTMainForm.FormCreate（Sender:
TObject）;
begin
FdmGrcw:
=TdmGrcw.Create（self）;
end;
（2）主窗体的OnDestroy事件
在主窗体的OnDestroy事件中，主要实现数据模块的释放，这与主窗体的OnCreate事件中创建数据模块是相对应的。
代码如下：
procedureTMainForm.FormDestroy（Sender:
TObject）;
begin
FdmGrcw:
=nil;
end;
（3）acSysterm的OnExecute事件
在acSysterm的OnExecute事件中，主要实现对系统管理模块窗体的调用，由于系统管理模块窗体是一个MDI子窗体，因此事先需要判断它是否以及创建。
代码如下：
procedureTMainForm.acSystermExecute（Sender:
TObject）;
begin
ifnotAssigned（Log）then
Log:
=Log.Create（Self,FdmGrcw）;
Log.Show;
end;
（4）acInput的OnExecute事件
在acInput的OnExecute事件中，主要实现对收支管理模块窗体的调用，由于收支管理模块窗体是一个MDI子窗体，因此事先需要判断它是否以及创建。
代码如下：
procedureTMainForm.acInputExecute（Sender:
TObject）;
begin
ifnotAssigned（Salary）then
Input:
=Salary.Create（Self.FdmGrcw）;
Salary.Show;
end;
（5）acPossession的OnExecute事件
在acPossessiont的OnExecute事件中，主要实现对资产管理模块窗体的调用，由于资产管理模块窗体是一个MDI子窗体，因此事先需要判断它是否以及创建。
代码如下：
procedureTMainForm.acPossessionExecute（Sender:
TObject）;
begin
ifnotAssigned（Possession）then
Possession:
=Possession.Create（Self.FdmGrcw）;
Possession.Show;
end;
（6）acAbout的OnExecute事件
在acAbout的OnExecute事件中，主要实现对关于窗体的调用，关于窗体以模态方式显示。
代码如下：
procedureTMainForm.acAboutExecute（Sender:
TObject）;
begin
withTAbout.Create（self）do
try
ShowModal;
finally
Free;
end;
end;
2.4.4创建数据模块
1.界面设计
表5-7dmGrcw数据组件说明
组件
名称
属性设置
说明
ADOConnection
adocGrcw
ConnectionString：
Provider=Microsoft.Jet.OLEDB.4.0;DataSource=gerencaiwu.mdb;
LogibPrompt:
False
连接字符串
不打开登录框
使用OLEDB方式连接数据库
TADOTabler
adotDlxx
Connection:
adocGrcw
TableName:
登录信息
数据库连接为adocGrcw
数据库表为登录信息
TADOTabler
adotSzgl
Connection:
adocGrcw
TableName:
收支管理
数据库连接为adocGrcw
数据库表为收支管理
TADOTabler
adotXj
Connection:
adocGrcw
TableName:
现金
数据库连接为adocGrcw
数据库表为现金
TADOTabler
adotGdzc
Connection:
adocGrcw
TableName:
固定资产
数据库连接为adocGrcw
数据库表为固定资产
2.代码实现
dmGrcw数据模块主要是在其OnCreate事件中实现与数据库的连接。
代码如下：
procedureTdmGrcw.DataModuleCreate（Sender:
TObject）;
var
I_File:
string;
begin
inherited;
I_File:
=DataPath+conGRCWDataFile;
ifnotFileExists（I_File）then
ShowMessage（'文件不存在！
无法打开数据库！
'）；
withadocGrcwdo
begin
ConectionString:
=CNT_ConnectString;
ConectionString:
=Format（ConnectionString,[I_File]）;
Connected:
=True;
end;
end;
2.4.5创建系统管理模块
1.界面设计
表5-8Log窗体主要组件说明
组件
名称
属性设置
说明
TForm
Log
Caption：
系统管理模块
FormStyle：
fsMDIChild
MDI窗体
TButton
btAdd
Action:
acAdd
Caption：
添加
关联Action为acAdd
TButton
btEdit
Action:
acEdit
Caption：
修改
关联Action为acEdit
TButton
btDel
Action:
acDel
Caption：
删除
关联Action为acDel
TButton
btBrowse
Action:
acBrowse
Caption：
查看
关联Action为acBrowse
TButton
btExit
Action:
acExit
Caption：
退出
关联Action为acExit
TDataSource
dsGrcw
TDBGrid
dbGrcw
Align:
alClient
DataSource：
dsGrcw
Options.dgEditing:
Fslse
ReadOnly:
True
关联数据源DataSource是dsGrcw
Grid只读
TActinList
alGrcw
2.代码实现
系统管理窗体中主要包括了用户账户、密码的添加、修改、删除、查看、退出的实现代码，另外还包括对DBGrid显示的处理等代码。
（1）窗体的Create事件
代码中对Form的Create事件进行了重构，声明如下：
public
constructorCreate（AOwner:
TComponent;AdmGrcw:
TdmGrcw）;reintrod
升级会员 