Delphi程序设计基础 教学课件 作者 张世明 第3章.ppt

《Delphi程序设计基础 教学课件 作者 张世明 第3章.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第3章窗体设计Delphi窗体、组件窗体属性、事件设计窗体窗体模板MDI程序及其设计3.1Delphi窗体3.2设计窗体3.3窗体模板3.4运行时改变窗体3.5MDI程序3.1Delphi窗体3.1.1窗体与窗口窗口是屏幕上被边框围住的一部分。它有标题，而且通常有一个控制菜单，用于移动、关闭、最大化、最小化窗口。在Windows中，用户界面的绝大多数都是窗口。应用程序的窗口，通常可分为三类：·重叠型窗口：作为应用程序的主窗口。·弹出式窗口：通常用于对话框与消息框。只有弹出式窗口才能覆盖其他窗口，弹出式窗口与重叠型窗口非常相似。·子窗口：通常用于不能移出父窗口客户区中的从属窗口，如用于

2、创建MDI应用程序等。3.1.2窗体属性窗体是用户设计应用程序界面的地方，有时也将窗体称作表单。在Delphi中，每个窗体都有一个窗体文件(.DRM)和一个单元文件(.PAS)。窗体文件保存着窗体和窗体上各个组件的属性；单元文件则是用户编写窗体的事件处理过程的地方。窗体的常用属性属性说明BorderStyle设置窗体的边界风格Caption用于设置显示在窗体标题栏上的文字。Height设置窗体的高度width设置窗体的宽度Left设置窗体左上角的x坐标Top设置窗体左上角的y坐标Color设置窗体的背景颜色BorderIcons用于决定窗体是否拥有系统菜单、最小化按钮、最大化按钮和帮

3、助按钮。ClientHeight设置用户区的高度，以像素为单位Clientwidth设置用户区的宽度，以像素为单位Ctl3D有Ture和False两种取值，用于决定窗体是否以三维显示Cursor设置窗体可用的各种光标Enabled决定窗体是否可响应事件Font决定窗体上所用的字体、字体颜色、字符大小及字体的一些特征。Formstyle即窗体风格ActiveControl决定程序运行时初始焦点的控件。Hint设置窗体的弹出提示文字ShowHint决定窗体及窗体中的组件是否会显示Hint属性所提供的提示文字HorzScrollBar决定窗体水平滚动条的各种属性VerScrollBar决定

4、窗体垂直滚动条的各种属性HelpContext提供窗体的上下文帮助文件名Icon决定窗体被最小化后的显示图标Menu决定当前窗体要使用哪个菜单作为主菜单Name命名窗体及组件对象，所有组件都有该属性。Position设置窗体的显示位置Visible决定窗体在运行时是否可见3.1.3窗体事件事件的产生可以来自系统，也可以来自用户。事件是一种将发生的动作与代码相连的机制。因此事件是一个方法指针，它指向某个类实例的方法。1．Create和Destroy事件当创建窗体时，就执行Create事件；当释放窗体所占用的空间时，就会执行Destroy事件。当创建窗体，并且Visible属性设置为Tr

5、ue时，下列事件按顺序出现Create、Show、Activate、Paint。2．Show和Hide事件Show事件和Hide事件分别在窗体显示与隐藏时被触发。当窗体的Visible属性设置为True时，窗体被显示，同时触发Show事件；当窗体的Visible属性设置为False时，窗体被隐藏，同时触发Hide事件。3．Activate和Deactivate事件当激活窗体时，就触发Activate事件，当窗体不再激活时，就会触发Deactivate事件。4．Click和DblClick事件在窗体上(光标没有在其它组件上)单击，就会触发Click事件。在窗体上双击，就会触发DblCl

6、ick事件。5．DragDrop事件在窗体上拖放操作时，就会产生DragDrop事件。该事件过程的基本语法形式为：procedureTForm.FormDragDrop(Sender,Source:TObject;X,Y:integer);其中Source参数为拖动的对象，Sender为要拖动到的对象，X和Y为拖放后鼠标的位置坐标(单位像素)。6．KeyDown、KeyUp和KeyPress事件在窗体上按下键盘的任一键(KeyDown)或释放它(KeyUp)，就会产生KeyDown和KeyUp事件。可以对键盘上的所有键，包括功能键及与Shift、Alt、Ctrl的组合键进行处理(但如

7、果按下的是快捷键或者热键，则不必编写事件处理程序，该操作由系统来完成)。在窗体上按下单个的字母键，就会产生KeyPress事件。7．MouseDown、MouseUp和MonseMove事件在窗体上按下或释放任一鼠标键时，就会出现MouseDown和MouseUp事件。在窗体上移动鼠标，就会产生MouseMove事件。8．Resize事件在调整窗体的大小时，就会触发Resize事件。3.2设计窗体3.2.1新建窗体设计窗体的第一步当然是新建空白窗体。单击[