《程序主界面》ppt课件

《《程序主界面》ppt课件》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、上一次课讲到如何使用快速报表、报表向导、报表设计器和报表的打印。请同学们回顾这样两个问题：1.报表有哪二个基本组成部分及各部分的作用如何？2.打印或预览报表的操作步骤及命令格式是什么？在VFP中，报表具有数据源和布局两个基本组成部分。数据源通常是表、视图、查询或临时表，通过视图和查询能够进行数据的筛选、排序和分组，报表布局则定义了报表的打印格式。预览报表的打印效果操作：菜单：显示/预览命令：ReportForm<报表文件名>PreviewFor/While<条件>打印报表操作：菜单“报表/运行报表”或菜单“文件/打印”命令：ReportFo

2、rm<报表文件名>For/While<条件>上一次课主要学习的内容本章主要介绍主界面类型、创建主菜单、工具栏、主表单。第6章.程序主界面主界面的类型：在VFP中，主界面一般有菜单式、表单式以及表单与菜单式。主界面的类型菜单式程序一般是指菜单作为程序的界面，通过将VFP窗口中原有的菜单隐藏，然后执行程序菜单，系统中所有功能由菜单来调用，另外菜单程序界面也可以加入工具栏。.1菜单式进入程序后,表单上放置按钮,通过按钮调用系统提供的功能。.2表单式使用表单作为程序主界面,在表单中加载菜单、工具栏及状态栏。一般使用该类界面作为程序主界面。下面以人力

3、资源管理系统程序主界面为例介绍表单与菜单式主界面的创建。.3表单与菜单式菜单可以使用户全面而清晰了解程序的所有功能。创建菜单的步骤：规划与设计菜单；创建菜单和子菜单；为菜单指定任务；生成菜单程序，测试运行菜单。6.1创建菜单1.按执行的任务组织菜单；2.定义简洁明了的菜单项；3.菜单项目不要过多；4.暂时未完成的菜单项目，应先规划好位置；5.通过定义快捷键提高操作速度。6.1.1菜单的设计原则步骤：项目管理器/其他/菜单/新建/新建菜单/{在菜单设计器中编辑规划好的菜单}。6.1.2创建菜单1.基础数据子菜单2.数据管理子菜单3.数据查询子

4、菜单4.数据输出子菜单修改密码的选项：用户组管理的选项：用户管理的选项：5.系统管理子菜单6.用户权限设置参考PUBLICArrayAuthName[17]AuthName[1]="基础信息管理"AuthName[2]="员工档案管理"AuthName[3]="奖励记录管理"AuthName[4]="惩罚记录管理"AuthName[5]="培训记录管理"AuthName[6]="调动记录管理"AuthName[7]="考评记录管理"AuthName[8]="用户组管理"AuthName[9]="用户管理"AuthName[10]="奖励记录

5、查询"AuthName[11]="惩罚记录查询"AuthName[12]="培训记录查询"AuthName[13]="考评记录查询"AuthName[14]="调动记录查询"AuthName[15]="员工档案查询"AuthName[16]="用户密码修改"AuthName[17]="培训项目管理"操作步骤：激活菜单设计器/菜单:显示/常规选项/勾选“顶层表单”。7.设置常规选项操作步骤：激活菜单设计器/菜单:“菜单”/生成：MainMenu.Mpr/生成8.生成菜单程序表单的属性设置：ShowWindow=2–作为顶层表单在表单的Init

6、中加入代码：DoMainMenu.Mprwiththis,.T.在表单的Destroy过程中加入代码：Release(This.Name)Extended---------完成----------9.设置加载表单在VFP中，创建工具栏可以通过创建Toolbar类的子类方式完成。创建工具栏步骤：1.项目管理器/类/新建2.类名:MyToolbar,基类:Toolbar,存储于:MyTools3.类设计器中,加入10个MyCmd类对象，4个分隔符设置控件属性：6.2创建工具栏控件captiontooltiptextClick代码CmdBasic

7、基本基本信息Doformbasicinfowith1CmdPer员工员工档案doformpersonnalCmdEnc奖励奖励记录doformenclogCmdPun惩罚惩罚记录doformpunishlogCmdRev考评考评记录doformreviewlogCmdTrain培训培训记录doformtrainlogCmdRed调动调动记录doformredeploylogCmdPass密码修改密码doformsetpassCmdUser用户系统用户doformuseradminCmdExit退出退出系统另外，CmdExit.Cancel=

8、.T..控件属性YN=MESSAGEBOX("确定退出系统",4+32,"人力资源管理系统")IFYN=6THISFORM.Parent.RELEASECLEAREVENTEND