第9章 设计简单的应用程序.ppt

1、第9章 设计简单的应用程序,9.1 设计一个简单的Visual FoxPro应用程序 9.2 一个简单的数据库应用程序,9.1 设计一个简单的Visual FoxPro应用程序,9.1.1 设计表单 9.1.2 编译应用程序,9.1 设计一个简单的Visual FoxPro应用程序（续）,需要如下步骤： 1.创建项目 2.设计表单 3.设计程序,9.1.1 设计表单,1. 建立表单,9.1.1 设计表单（续1）,9.1.1 设计表单（续2）,2. 添加控件,9.1.1 设计表单（续3）,3. 编辑控件的属性,9.1.1 设计表单（续4）,4. 编写事件代码,9.1.1 设计表单（续4）,4.

2、编写事件代码,Command1对象的Click事件的事件代码为： THISFORM.Label1.Caption = Visual FoxPro 欢迎你！,Command2的Click事件的事件代码为： THISFORM.Release,9.1.2 编译应用程序,（1）应用程序文件（.APP） （2）可执行文件（.EXE） （3）动态链接库（.DLL）,可以运行的程序文件主要应包括：,9.1.2 编译应用程序（续1）,1. 设置主文件 应用程序起始执行的文件称为“主文件”。由主文件调用所需要的应用程序的其他组件。所有应用程序必须包含一个主文件。,9.1.2 编译应用程序（续2）,2. 主文件中

3、的内容 初始化环境设置。 显示初始的用户界面。 控制事件循环。 退出应用程序前，结束事件循环，恢复原始的环境设置。,9.1.2 编译应用程序（续3）,9.1.2 编译应用程序（续4）,主文件“程序1.prg”的代码为： DO FORM 表单1.scx READ EVENTS Form1的Unload事件的事件代码为： CLEAR EVENTS,9.1.2 编译应用程序（续5）,3. 编译为可执行文件,进入项目管理器 单击项目管理器中的【连编】按钮 在弹出的对话框中选择“连编可执行文件” 在随后弹出的保存文件的对话框中输入可执行文件的文件名,9.2一个简单的数据库应用程序,9.2.1 绑定 9.

4、2.2 数据环境 9.2.3 添加绑定型控件 9.2.4 编写程序代码,9.2一个简单的数据库应用程序（续）,9.2.1 绑定,“绑定”是将控件与表（或视图）或字段联系起来，能够自动地实现控件与数据库之间的数据交换。 与表或字段联系在一起的控件称为绑定型控件；把与控件绑定在一起的表、视图、或字段称为数据源。,9.2.2 数据环境,通常在添加所需控件之前，先把相关的表、视图组织起来，从而形成一个表单的数据环境。数据环境与表单一起保存，因此在表单运行时数据环境将自动打开、关闭表和视图。,9.2.3 添加绑定型控件,建立了数据环境后，下一步就是要往表单中添加需要的控件，并为这些控件建立起与数据源之间

5、的联系，即设置绑定，使一般控件成为绑定型控件。 在本例中，我们需要在表单中建立以下两种绑定型控件： 1. 绑定型表格控件 2. 绑定型文本框控件,9.2.3 添加绑定型控件,1建立绑定型表格控件,在表单中添加一个表格控件 在其上单击鼠标右键，在弹出的快捷菜单中单击【生成器】命令，弹出表格生成器”对话框,9.2.3 添加绑定型控件（续1）,3）在表格生成器中设置“表格项”、“样式”、“布局”,为图书表设计出的表格控件为：,9.2.3 添加绑定型控件（续2）,2建立绑定型文本框控件,（1）在表单中添加一个文本框控件。 （2）其上单击鼠标右键，在弹出的快捷菜单中选择“生成器” （3）为文本框选择字段

6、,9.2.4 编写程序代码,1“定位书名”按钮SrchButton的Click事件代码,BookName = ALLTRIM(THISFORM.ConditionEdit.Text) IF BookName = MessageBox(你应当输入查询条件！) ELSE LOCATE FOR 书名 = BookName IF .NOT. FOUND() MessageBox(没有找到！) ENDIF THISFORM.Refresh THISFORM.BookGrid.SetFocus ENDIF,9.2.4 编写程序代码（续）,2表单BookForm的Unload事件代码： CLEAR EVENTS 3“退出”按钮ExitButton的Click事件代码： THISFOR