Delphi程序设计实训教程高职 作者 占跃华 第9－10章 第9章.pptVIP

　第9章 系教工参考书借阅管理系统　　　　—MDI窗体、菜单及工具栏 9.1 系教工参考书借阅管理系统案例分析　　　　在前面的开发中，我们将数据库连接、数据表和数据源等运行期不可见的组件都放在了窗体设计界面中。这样做，虽然调用比较直观，但是却为窗体布局设计带来了麻烦，并且也不利于数据的统一管理，而且前面的应用程序每一个功能都是一个单独的窗体，不像我们平时使用的软件，没有菜单的统一控制，也没有工具栏的快捷操作，使用起来不是很方便。在本章中，我们将引入数据模块窗体、菜单、工具栏、状态栏以及MDI的结构来完善系教工参考书借阅管理系统。 　 　9.2 相 关 知 识 点　　本章案例涉及的主要知识点有：　　● 数据模块；　　● MDI窗体；　　● 操作列表与图像列表；　　● 菜单设计；　　● 工具栏；　　● 状态栏。 9.2.1 数据模块　　在编写数据应用程序时，有时很多组件、窗体同时访问相同的数据源，如果为每一个组件或者窗体都设置一个数据源将十分浪费时间；而且将数据源等运行期不可见的组件和运行期的可视组件放在一起，往往显得比较杂乱，给设计窗体工作带来了不必要的麻烦。因此，我们引入了数据模块的概念，可以方便地对数据源进行管理。数据模块是用来集中管理数据源的一个窗体，该窗体可在需要的地方随时引入。 　　创建数据模块的常用方法：单击“File”→“New” →“Data Module”，如图9.1所示。　　此时将创建一个新的数据模块，如图9.2所示。数据模块窗体名为“DataModule1”，保存文件名为“DataModule.pas”。在以后的设计中都将通过数据模块窗体名来引用其中的数据组件。从外观上看，数据模块就是一个窗体，在它上面可以放置非可视组件，在模块窗体中创建数据组件对象的方法与在其他窗体中的创建方法相同，可用对象监视器设定这些组件和窗体本身的属性，也可以响应一些事件。 图9.1 创建数据模块 图9.2 新建的数据模块 图9.3 数据模块上单击鼠标右键后弹出的菜单 表9-1 各常用菜单项的含义 图9.4 数据模块及其上面的组件 　　了解了数据模块，我们就可以使用数据模块存放非可视组件了。例如，我们在新建立的数据模块DataModule1上面放置一个Database组件、两个Table组件以及两个DataSource组件。　　数据模块DataModule1如图9.4所示。　　五个组件的属性设置如表9-2所示(表格是示意性的，与我们要开发的管理系统无关)。 表9-2 数据模块上五个组件的属性 图9.5 数据模块的对象树状图 　　在数据模块上单击鼠标右键，选择“View as Text”项，就会自动调出该模块的单元文件：　　object DataModule1: TDataModule1　　 OldCreateOrder = False　　 Left = 382　　 Top = 383　　 Height = 331　　 Width = 334　　 object Database1: TDatabase　　 AliasName = MYMSSQL1　　 Connected = True　　 DatabaseName = testdb　　 SessionName = Default　　 Left = 16　　 Top = 16　　 end 　　 object Table1: TTable　　 DatabaseName = testdb　　 TableName = authors　　 Left = 16　　 Top = 72　　 end　　 object Table2: TTable　　 DatabaseName = testdb　　 TableName = jobs　　 Left = 16　　 Top = 128　　 end　　 object DataSource1: TDataSource　　 DataSet = Table1　　 Left = 80　　 Top = 72 　　 end　　 object DataSource2: TDataSource　　 DataSet = Table2　　 Left = 80　　 Top = 128　　 end　　end 9.2.2　MDI窗体　　MDI是英文Multiple Document Interface的缩写，表示多文档的界面。MDI结构包括一个主窗体和若干个子窗体。可以方便地在各个子窗