在需求分析、概念结构设计的基础上得到数据库的逻辑结构之后,我们就可以在Visual FoxPro 6.0数据库系统中实现该逻辑结构。
在Visual FoxPro的主菜单中单击降按钮,在弹出的“新建”对话框中选中“项目”,单击“新建文件”按钮。弹出“创建”对话框,这是为该项目设置存储路径,请将项目名设为Hospital(医院)的项目,保存在磁盘中。例如"Whospital"文件夹。
项目建立好后,就可以实现数据库结构了。注意,Visual FoxPro的数据库结构是依靠项目存在的。
在如图3-4所示的“项目管理器’,中展“数据”文件夹,鼠标选中“数据库”单击右侧的“新建”按钮。
在弹出的“新建数据库’,对话框中单击“新建数据库”选项,然后将数据库存储为D:\hospital\database\hospital.dbc .
现在就可以为数据库添加数据表了,表的具体内容如表3一1至表3-7所示。下面以表3-4为例讲解数据表的创建过程。
4各个功能模块的创建
4.1系统欢迎界面及主界面模块设计
当软件运行出现欢迎界面后一段时间内按下空格键后就进入系统主界面。
1.欢迎界面设计
这个部分的设计思路是为整个系统设计一个“欢迎使用”的画面,为防止单调,加入字体闪烁的效果。其步骤如下:
为表单加上背景画面,设定表单的Picture属性为希望加入的图画路径及名称,在图片上面有颜色和大小随时间改变的文字“欢迎使用医院管理系统”.设置表单的kon属性为一图标文件Cico),可以代表表单左上角的Visual FoxPro图标。
为表单添加一个标签控件,注明软件设计者等信息,表单的界面如图3-17所示。
为表单添加一个计时器(Timer)控件,它的属性Interval表明间隔时间。在计时器的Timer事件中编程使该表单释放并调用主界面表单。Timer事件是在从表单运行到Interval属性规定的时间间隔过后被触发的。
在表单的KeyPress Event事件中编写代码,使当空格键按下时将该表单释放并执行主界面表单。KeyPress Event事件是当有键按下时被触发的。
在表单的Click Event事件中编写代码,使当鼠标单击时将该表单释放并执行主界面表单。
该表单如图3-7所示。
图3-7欢迎界面
根据前面的设计思路,为了实现表单中的字体颜色和大小随时间变化(本设计为每秒变化一次),拟定了如下的步骤:
新建一个表单,存储名为“ksjm”。在表单中适当位置添加Label控件,填入所需显示的文字。
在表单的Init Event事件中填入如下代码:
public i
public j
i=0
j=0
设计两个全局变量以控制事件发生条件。
在表单的KeyPress Event事件中填入如下代码:
LPARAMETERS nKeyCode, nShiftAltCtrl
thisformselease
*释放本表单
do form hospital\form\nain
*执行表单main
在表单的Click Event事件中填入如下代码:
thisform.release
*释放本表单
do form hospital\form\main
执行表单main
在表单中添加一个Timer控件,设置其interval属性为1000(单位是毫秒),表单中Timer的Timer Event事件的代码如下:
if i=0
thisform.label l .fontsize=22
*将表单中label l控件的字体大小设为22
thisform.labelIfontsize=24