C++Builder 东北电力软件开发实训

目录

目录

第1章绪论 (1)

1.1课题背景 (1)

第2章系统设计任务及要求 (3)

2.1 设计内容 (3)

2.2 课程设计的要求 (3)

第3章分析设计系统 (4)

3.1系统需求分析 (4)

3.2 系统性能要求 (4)

3.3 系统的功能分析 (4)

3.4 系统功能模块 (4)

3.5 功能的实现 (4)

3.5.1 数据查找与浏览模块 (4)

3.5.2 数据修改模块 (5)

3.5.3 报表显示模块 (5)

3.5.4 系统封面构成模块 (5)

3.5.5 系统功能模块图 (5)

第4章系统设计 (6)

4.1 数据库的建立 (6)

4.1.1数据库别名的建立 (6)

4.1.2 数据表的建立 (6)

4.2 系统封面设计 (7)

4.3 学生信息管理系统主界面设计 (9)

4.4 添加界面 (12)

4.5 删除功能设计 (15)

4.6 数据修改界面 (15)

4.7 数据查询界面设计 (19)

4.8 照片的添加与修改 (21)

4.9 报表打印界面设计 (21)

结论 (25)

参考文献 (26)

第1章绪论

第1章绪论

1.1课题背景

随着计算机技术的发展，计算机已得到越来越广泛的应用。为进一步加快教育信息化的建设步伐，推动全国教育管理信息化工作向规范化和健康化方向发展，利用现代化的手段建立本校的管理信息系统，实现管理的科学化、现代化是提高教学质量和管理水平的发展趋势。随着管理信息系统的相对完善，学校管理信息化建设的重要性与效益逐渐体现，因此，开发建设高校的学生管理信息系统是本文研究的课题。当前市场上的学生管理软件质量参差不齐，高校一定要克服贪便宜、能用就行的思想，应该引进成熟、先进的学生信息管理系统不仅可以实现学生工作的信息化管理，还可以带动人员素质甚至整个学校信息化建设水平的大幅提高。

学生信息管理系统是一个教育单位不可缺少的部分。一个功能齐全、简单易用的信息管理系统不但能有效地减轻学校相关工作人员的工作负担，它的内容对于学校的决策者和管理者来说都至关重要。所以学生信息管理系统应该能够为用户提供充足的信息和快捷的查询手段。但一直以来人们使用传统人工的方式管理文件档案、统计和查询数据，这种管理方式存在着许多缺点,如:效率低、保密性差,人工的大量浪费；另外时间一长,将产生大量的文件和数据,这对于查找、更新和维护都带来了不少困难。随着科学技术的不断提高,计算机科学日渐成熟,其强大的功能已为人们深刻认识,它已进入人类社会的各个领域并发挥着来越重要的作用。

国内高校的学生管理信息系统发展不平衡。目前在学生管理信息系统方面同时并存三种模式。第一种模式是单机管理模式，在一些学校里，计算机网络还没有建立起来，计算机之间不能进行数据交换和信息共享，这些学校仍然停留在面向部门的单项事务处理的水平上，这种状况决定他们的系统经常出现数据不一致，容易发生数据丢失、系统感染病毒等问题;第二种模式是局域网管理模式，可以开展网络上的工作。比如建立局域网上的学生管理信息系统，数据集中在部门服务器上，为学生处本部门的管理人员提供数据共享，这种方式对于部门内部的管理工作起到了促进作用，解决了部门内部的数据冗余和不一致的问题，但是应用软件都在工作站上完成，工作站负担过重，服务器只是实现文件的存储、数据存储和打印共享，网络利用率较低。校内很多单位都有自己的局域网，遇到需要了解学生处掌握的信息时，就向学生处要求提供，学生处也只能根据要求把自己部门的信息整理出来，再传送到需求部门，这样不能实现不同单位间的数据共享，更不能实现信息资源的合理流动；第三种模式是覆盖全校的学生管理信息系统，这个学生信息系统以学生处管理系统为基础，满足校内

- 1 -

软件开发实训课程设计

外对学生信息共享和利用的要求，并为各级领导提供有效的辅助决策服务。

高校学生管理系统将计算机用于现代化管理，在高校学生处进行关于高校学生信息的处理，完成了许多功能，如信息录入、常规查询等。本文介绍的高校学生管理信息系统是基于Borland C++ Builder6.0的系统。数据库技术是现代高校管理自动化的重要而关键的环节，在日益信息化、办公电脑化的今天发挥着越来越重要的作用。管理信息系统的开发呈现了一种“人机系统”，它以特定的模式支持一个组织内各级组织机构之间的通讯，对信息资源进行综合开发、管理和利用，实现对该组织的有效管理。该项目开发的软件为学校学生信息管理系统软件,是鉴于目前学校学生人数剧增,学生信息呈爆炸性增长的前提下,学校对学生信息管理的自动化与准确化的要求日益强烈的背景下构思出来的,该软件设计完成后可用于所有教育单位(包括学校,学院等等)的学生信息的管理. 目前社会上信息管理系统发展飞快,各个企事业单位都引入了信息管理软件来管理自己日益增长的各种信息,学生管理系统也是有了很大的发展,商业化的学生信息管理软件也不少.但本系统完全独立开发,力求使系统功能简洁明了,但功能齐全且易于操作。

本文通过对高校学生管理信息系统的分析与设计，介绍了该系统的设计思想、设计方法和开发的步骤及成果。

- 2 -

第2章系统设计任务及要求

第2章系统设计任务及要求

2.1 设计内容

制作学生信息管理系统，实现数据录入、数据删除、数据刷新和数据浏览以及数据查询等一些功能。

2.2 课程设计的要求

A．创建学生管理数据表，该表反映学生的基本信息，其中包含学号、学生姓名、学生性别、所在班级、年龄、入学日期、职务、照片和简历等字段。

B．根据自己的喜好设计系统封面，系统封面设计成由计时器控制，在设定的时间间隔内，系统封面显示达到或超过设定的显示时间，系统封面会自动释放。

C．应用系统主控界面应包括记录编辑和记录查询等功能模块。记录编辑功能完成学生记录编辑的记录增加、记录删除、记录刷新和记录查询等功能。记录查询功能可以对数据集中的记录进行查询，要求按学号进行查询。

- 3 -

第3章分析设计系统

第3章分析设计系统

3.1系统需求分析

①能够输入学生的综合情况的输入、修改以及删除；

②能够实现对学生信息的浏览；

③能够实现对学生进行查询；

④设计系统封面并由计时器控制；

3.2 系统性能要求

①系统安全、可靠；

②功能齐全；

③操作方便、界面友好；

④易于维护和扩充。

3.3 系统的功能分析

资料维护：系统维护包括对各种表记录的修改、删除、添加等操作。

资料维护：对数据表中的信息进行浏览。

系统查询：可以按学号、姓名等相关信息进行详细或模糊查询。

报表统计：学号、学生姓名、学生性别、所在班级、年龄、入学日期、职务、照片和简历等字段。

其它操作：系统封面、计时器控制与人性化提示信息。

3.4 系统功能模块

学生管理系统有：数据查找与浏览、数据修改、报表显示和系统封面构成。

3.5 功能的实现

3.5.1 数据查找与浏览模块

（1）数据查找：通过学号字段进行精确或模糊查找。

（2）数据浏览：可以对数据表中的数据实现，上一项、下一项、首相、尾项等操作。

（3）其他信息：设置字体、窗体的颜色属性以及一些提示信息。

- 4 -

软件开发实训课程设计

（1）添加数据：增加一个新的记录。

（2）修改数据：修改原有记录。

3.5.3 报表显示模块

显示当前查找到的数据内容，以报表形式打印。

3.5.4 系统封面构成模块

（1）系统时钟：在在设定的时间间隔内，系统封面显示达到或超过设定的显示时间，系统封面会自动释放

（2）功能实现：进入主界面与退出系统。

3.5.5 系统功能模块图

图3-5-1 系统功能模块图

- 5 -

第4章 系统设计

- 6 -

第4章 系统设计

4.1 数据库的建立

4.1.1数据库别名的建立

新建数据库别名，设置正确的路径，并且应用设置。利用BDE Administrator 来创建别名，本设计为学生信息管理，BDE 界面图如下：

图4-1-1 数据库别名建立界面

4.1.2 数据表的建立

数据库利用Database Desktop 建立，首先新建表，选择Paradox7，进入数据库创建界面。表中A 代表字符型，G 代表图型。添加XH 作为索引字段。所有字段输入完后，点击Save As,保存为XSXXB.DB 即可。数据库的建立示意图如下：

图4-1-2 数据库表结构

软件开发实训课程设计

系统封面可以插入自己喜欢的图片，利用Additional选项卡中的TImage组件完成，另外利用System选项卡中的TTimer 组件来设置进入系统的定时操作，利用两个TButton组件完成进入系统与退出系统的功能。系统封面图设计如下：

图4-2-1 系统封面设计图

本界面实现的程序代码为：

//--------------------------------------------------------------------------- #include

#pragma hdrstop

#include "Unit1.h"

#include "Unit2.h"

//--------------------------------------------------------------------------- #pragma package(smart_init)

#pragma resource "*.dfm"

int logintime=5; //进入系统等待时间X 秒

TForm1 *Form1;

//--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

- 7 -

第4章系统设计

//--------------------------------------------------------------------------- void __fastcall TForm1::Timer1Timer(TObject *Sender)

{

if(logintime==0)

{ Timer1->Enabled=false;

Form2->Show();}

logintime--;

Label1->Caption ="倒数("+IntToStr(logintime)+")秒进入";

}

//--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender)

{

logintime=5;

Timer1->Enabled=false;

Form2->Show();

}

//--------------------------------------------------------------------------- void __fastcall TForm1::Button2Click(TObject *Sender)

{

Close();

}

//--------------------------------------------------------------------------- void __fastcall TForm1::FormCloseQuery(TObject *Sender, bool &CanClose) {

if(MessageDlg("确实要关闭系统吗?",mtConfirmation,

TMsgDlgButtons()<

CanClose=false;

}

//--------------------------------------------------------------------------- 本系统设计的进入程序的倒计时间为5秒，到5秒以后系统自动进入登陆界面，在关闭系统时，会询问是否关闭系统，以免发生误操作。

程序运行后界面效果图如下：

- 8 -

软件开发实训课程设计

- 9 -

图4-2-2 系统运行封面效果图

系统运行时，当点击退出按钮，或者Alt+Q 快捷键，会出现如下界面：

图4-2-3 退出系统界面图

4.3 学生信息管理系统主界面设计

学生信息管理系统主界面主要由菜单栏和数据显示栏以及功能按钮组成。菜单栏设计由standard 选项卡中的TMainmenu 组件来实现菜单的设置，双击组件TMainmenu ，进行输入相应的功能设置，界面如下：

第4章 系统设计

- 10 -

图4-3-1 菜单栏设置界面

学生信息管理系统主界面图如下：

图4-3-2 学生信息管理系统主界面

界面中由TTable 组件、TQuery 组件、TDatasource 组件和TDBGrid 组件实现数据显示，其他TButton 组件完成相应的功能。信息管理主界面，通过设置Table1,Datasource1属性，进行数据库与表的连接。属性设置由对象检视器界面设置，其中Table1的Database name 设置为数据库别名——LINLIN ，Table name 为数据库的名称——XSXXB.DB ，另外Datasource 组件的Dataset 属性设置为Table1，Table1的Active 属性设为True ，DBGrid 的Datasource 属性设为Datasource1这样,TDBGrid 组件就与数据库相联立起来了。具体对象检视器界面如下：

软件开发实训课程设计

- 11 -

图4-3-3 对象检视器界面

信息管理主界面中的置顶、上一条、下一条、置尾按钮与Table1相连，具体实现程序如下：

//-----------------------------------------------------

void __fastcall TForm2::Button1Click(TObject *Sender)

{

Table1->First();

StatusBar1->Panels->Items[0]->Text="使用置顶";

}

//-----------------------------------------------------

void __fastcall TForm2::Button2Click(TObject *Sender)

{

Table1->MoveBy(-1);

StatusBar1->Panels->Items[0]->Text="使用上一条";

}

//-----------------------------------------------------

void __fastcall TForm2::Button4Click(TObject *Sender)

{

Table1->Last();

StatusBar1->Panels->Items[0]->Text="使用置尾";

}

第4章 系统设计

- 12 -

//-----------------------------------------------------

void __fastcall TForm2::Button3Click(TObject *Sender)

{

Table1->Next();

StatusBar1->Panels->Items[0]->Text="使用下一条";

}

//-----------------------------------------------------

4.4 添加界面

添加界面就由一系列TButton 组件和TLabel 组件通过编程来实现，通过信息管理主界面的菜单栏下的添加栏调出添加界面，注意在窗体调用的时候要把被调窗体的头文件放在调用窗体的头文件中，这样才能实现窗体间的调用。添加界面设计如下：

图4-4-1 添加界面

实现添加的程序代码如下：

//---------------------------------------------------------------------------

#include

#include

#pragma hdrstop

#include "Unit3.h"

#include "Unit2.h"

//---------------------------------------------------------------------------

软件开发实训课程设计

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm3 *Form3;

//--------------------------------------------------------------------------- void __fastcall TForm3::Button1Click(TObject *Sender)

{

if(Edit1->Text.IsEmpty())

{ShowMessage("输入的学号不能为空");

return;}

if(Edit2->Text.IsEmpty())

{ShowMessage("输入的姓名不能为空");

return;}

if(Edit3->Text.IsEmpty())

{ShowMessage("输入的性别不能为空");

return;}

if(Edit4->Text.IsEmpty())

{ShowMessage("输入的班级不能为空");

return;}

if(Edit5->Text.IsEmpty())

{ShowMessage("输入的年龄不能为空");

return;}

if(Edit6->Text.IsEmpty())

{ShowMessage("输入的入学日期不能为空");

return;}

if(Edit7->Text.IsEmpty())

{ShowMessage("输入的职务不能为空");

return;}

if(Memo1->Text.IsEmpty())

{ShowMessage("简历内容不能为空");

return;}

Table1->Append();

Table1->FieldByName("XH")->AsString=Edit1->Text.Trim();

Table1->FieldByName("XM")->AsString=Edit2->Text.Trim();

- 13 -

第4章系统设计

Table1->FieldByName("XB")->AsString=Edit3->Text.Trim();

Table1->FieldByName("BJ")->AsString=Edit4->Text.Trim();

Table1->FieldByName("NL")->AsString=Edit5->Text.Trim();

Table1->FieldByName("RXRQ")->AsString=Edit6->Text.Trim();

Table1->FieldByName("ZW")->AsString=Edit7->Text.Trim();

Table1->FieldByName("JL")->AsString=Memo1->Text.Trim();

Table1->Post();

Form2->Show();

}

//--------------------------------------------------------------------------- void __fastcall TForm3::Button2Click(TObject *Sender)

{

Edit1->Text="";

Edit2->Text="";

Edit3->Text="";

Edit4->Text="";

Memo1->Text="";

Edit5->Text="";

Edit6->Text="";

Edit7->Text="";

}

//--------------------------------------------------------------------------- void __fastcall TForm3::Button3Click(TObject *Sender)

{

Form3->Close();

}

//--------------------------------------------------------------------------- 本程序实现的功能有当添加的某一项为空时，提醒输入内容不能为空，当点击清空按钮时，实现各个编辑框信息清除，为下一次数据录入做准备。当点击添加按钮时，当前添加的数据被录入到数据库中，由于Table组件功能的局限性，需要将数据库关闭后在打开，数据才算真正的录入，因而信息管理主界面有数据更新和刷新功能，具体程序如下：

//--------------------------------------------------------------------------- void __fastcall TForm2::Button5Click(TObject *Sender)

- 14 -

软件开发实训课程设计

{

if(MessageDlg("真的刷新数据库表？",mtConfirmation,

TMsgDlgButtons()<

{Table1->Active=false;

Table1->Active=true;

StatusBar1->Panels->Items[0]->Text="成功刷新数据库";}

else

Table1->Cancel();

}

//---------------------------------------------------------------------------

4.5 删除功能设计

利用信息管理主界面菜单栏下的删除栏实现数据库的删除功能，具体程序如下：

//--------------------------------------------------------------------------- void __fastcall TForm2::Button7Click(TObject *Sender)

{

AnsiString ass;

if(Application->MessageBox(("提示：确定要删除:"+ass+"的记录吗？").c_str(), "提示",MB_YESNO)==IDYES)

{Table1->Delete();

StatusBar1->Panels->Items[0]->Text="成功删除数据"; }

}

//--------------------------------------------------------------------------- 在删除数据时会询问确定要删除吗？这样可以避免误操作。本系统实现删除光标所在行的数据。

4.6 数据修改界面

数据修改界面主要完成数据库原有数据的修改功能。本设计思想为，先在主界面快捷查询要修改数据的原信息，确认其存在然后光标定位其位置，之后完成修改。快捷查询的程序代码如下：

//--------------------------------------------------------------------------- void __fastcall TForm2::Button9Click(TObject *Sender)

{

- 15 -

第4章 系统设计

- 16 -

if(Table1->FindKey(ARRAYOFCONST((Edit1->Text))))

{ ShowMessage("提示：记录找到，可以修改！");

Form4->Show();

StatusBar1->Panels->Items[0]->Text="修改信息"; }

else

ShowMessage("提示：查无此人！");

Edit1->Text=""; }

//---------------------------------------------------------------

运行后，其相关界面如下：

图4-6-1 快捷查询运行界面

点击菜单栏下的修改栏，相应的会出现修改信息界面：

图4-6-2 修改信息界面

软件开发实训课程设计

实现修改的代码如下：

//------------------------------------------------------------------- void __fastcall TForm4::Button1Click(TObject *Sender)

{

if(Edit1->Text.IsEmpty())

{ShowMessage("输入的学号不能为空");

return;}

if(Edit2->Text.IsEmpty())

{ShowMessage("输入的姓名不能为空");

return;}

if(Edit3->Text.IsEmpty())

{ShowMessage("输入的性别不能为空");

return;}

if(Edit4->Text.IsEmpty())

{ShowMessage("输入的班级不能为空");

return;}

if(Edit5->Text.IsEmpty())

{ShowMessage("输入的年龄不能为空");

return;}

if(Edit6->Text.IsEmpty())

{ShowMessage("输入的入学日期不能为空");

return;}

if(Edit7->Text.IsEmpty())

{ShowMessage("输入的职务不能为空");

return;}

if(Memo1->Text.IsEmpty())

{ShowMessage("简历内容不能为空");

return;}

Form2->Table1->Edit();

Form2->Table1->FieldByName("XH")->AsString=Edit1->Text.Trim();

Form2->Table1->FieldByName("XM")->AsString=Edit2->Text.Trim();

Form2->Table1->FieldByName("XB")->AsString=Edit3->Text.Trim();

- 17 -

第4章系统设计

Form2->Table1->FieldByName("BJ")->AsString=Edit4->Text.Trim();

Form2->Table1->FieldByName("NL")->AsString=Edit5->Text.Trim();

Form2->Table1->FieldByName("RXRQ")->AsString=Edit6->Text.Trim(); Form2->Table1->FieldByName("ZW")->AsString=Edit7->Text.Trim();

Form2->Table1->FieldByName("JL")->AsString=Memo1->Text.Trim();

Form2->Table1->Post();

Form2->Show();

}

//------------------------------------------------------------------- void __fastcall TForm4::Button2Click(TObject *Sender)

{

Edit1->Text="";

Edit2->Text="";

Edit3->Text="";

Edit4->Text="";

Memo1->Text="";

Edit6->Text="";

Edit7->Text="";

Edit5->Text="";

}

//------------------------------------------------------------------- void __fastcall TForm4::Button3Click(TObject *Sender)

{

Form4->Close();

}

//------------------------------------------------------------------- void __fastcall TForm4::FormCreate(TObject *Sender)

{

StatusBar1->Panels->Items[1]->Text=Now();

}

//-------------------------------------------------------------------

- 18 -