数据库设计与开发实验1

《数据库设计与开发实验1》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、实验33.6.1实验目标■进一步熟悉Delphi集成开发环境(IDE)■熟悉窗体和菜单的使用■熟悉Delphi应用程序源代码的编写3.6.2实验内容完成记事本应用的部分功能。3.6.3实验步骤第一步：打开第二章实验中的记事本工程。在主界面上放置一个主菜单控件，双击主菜单控件打开菜单编辑器，设计如下菜单。注：CE+*为快捷键，可通过菜单项的Shortcut属性设置。［文件(F)I镰卷(E)格式(0)文件(F)剪切(Cut)Ctrl+X复制(Copy)Ctrl+C粘贴(Paste)CtrkV文件(F)编皐(E)

2、格式(0)•新建(New)CtrkN打开(Open)...Ctrl+0

3、魅(Save)Ctrl+S另存为(SaveAs)...退出票统(exit)査找(Find)...Ctrl+F替换(Replace)”.Ctrl+R吕动换行(W)字体(F)…全选(SelectAll)Ctrl+A图3.10记事本程序主菜单第二步：在主窗体上放置一个Memo控件，并将其Align属性设置为alClient,并通过属性设置为Memo控件增加横向纵向滚动条、将其中的Memol字样删除。笫三步：实现新建功能。编写“新建”菜单项的事件过程，并编写代码清除Memo中的文字内容。第四步：实现退出系统功能。编写“退出系统”菜单项的事件过程，并编写代码关闭主窗体，即可退出系统。第五

4、步：实现自动换行功能。编写“自动换行”菜单项的事件过程，并编写代码，在代码中对菜单项的checked属性进行判断，如果为false则将Memo控件的滚动条设置为只有纵向滚动条,如果为true则将Memo控件的滚动条设置为双向；同时改变菜单项控件的checked属性值。第六步：通过菜单启动“查找”窗体、“替换”窗体、“字体”窗体。分别编写三个菜单项的事件过程，并将“查找”窗体和“替换”窗体采用无模态方式显示、“字体”窗体采用模态方式显示。要求显示的子窗体位于主窗体的中间位置。注查找”和“替换”窗体对象在程序启动时就已经创建，所以不需要在代码中将窗体对象创建，只要将其显示即可；“字

5、体”窗体对象在程序启动时没有创建，需要在代码中先创建窗体对象，在以模态方式显示，关闭后将窗体对象释放。3.6.4实验结果分析问题1：在设计菜单时，如何实现分隔线？如何实现字符下的下划线（可通过ALT+字符访问菜单功能）？菜单项的checked属性在不同取值情况下有什么区别？答：在Caption中输入■即可实现分隔线；在字符前加&符号即可实现字符下的下划线；checked取true时,功能可用于选择，取false时不可用。问题2：如何给Memo控件增加滚动条？如何在设计时将Memo控件中的文字内容删除？如何在代码中将Memo控件中的文字内容删除？答:在Memo中选ScrollBa

6、rs中的下拉框可以增加滚动条;选Lines中的Tstrings,然后删除里面的Memo文字内容即可；写代码用以下代码即可：Memo1.Lines.delete（行数）；问题3：什么方法可以关闭窗体？如何是窗体启动时就处于最大化状态？如何将子窗体的显示位置设置到主窗体的中间？如何释放窗体对象的内存资源？说明模态和无模态窗体的区别。答：写代码：self.close即可关闭窗口；在WindowState（窗体状态）中选择wsMaximized即可使窗体最大化显示；选择Position中选择poMainFormCenter,即可将了窗体的显示位置设置到主窗体的中间；Release和Fr

7、ee可释放窗体内存资源，Release等窗体所有事件都执行完成了再释放窗体，而free不管事件的执行就立即释放窗体；通过show方法显示的窗体我们称之为无模态窗体,这种窗体将独立运行在一个线程中，调用该方法的代码会继续往下运行，如代码3.4所示，显示fonnl后马上被关闭。如果是在另外一个窗体的代码中运行该方法，则两个窗体都可被激活，因为它们运行在不同的线程中，如代码3.5所示，执行该段代码后，Forml和Form2同时显示，并且都可以被激活，用户可在两个窗体间进行切换。通过showModal显示的窗体为模态窗体，这种窗体将运行在调用代码的同一个线程中，调用该方法的代码不会继续

8、往下运行,如代码3.6所示，显示fornil不会被关闭。如果是在另外一个窗体的代码中运行该方法，则只有这个窗体被激活，如代码3.7所示，执行该段代码后，Forml不可被激活，只有Fonn2可以被激活，用户不能在两个窗体间进行切换。