《delphi程序设计及实验指导》电子教案--第4章

《《delphi程序设计及实验指导》电子教案--第4章》由会员分享，可在线阅读，更多相关《《delphi程序设计及实验指导》电子教案--第4章（42页珍藏版）》请在金锄头文库上搜索。

1、Delphi 7 程序设计与实验指导张景安 赵慧勤 张叶娥 傅文博 编 著第四章 常用组件 在使用Delphi开发应用程序中，广泛地使用到组件。可 视组件库（Visual Component Library，简称VCL）是 Delphi中最重要的部分，通过VCL可以在窗体中方便地 构建与用户交互的界面，其中大部分组件显示在组件 面板（Components Palette）上。除了少数例外，所有 的组件都是TComponent类的子类。另外，用户还可以 创建自己定义的特殊功能组件。本章主要介绍Delphi 7 中常用组件的基本功能及主要属性、方法等内容。 4.1 组件概述 4.1.1 组件分类

2、1可视化组件（Visual Component） 可视化组件在程序运行期间用户是可以看到的，也称为 控件（Contro1）。控件又有两种不同的类型，即基于窗 口的和基于图形的。基于窗口的控件（即窗口控件）是 指基于系统窗口的可视组件，具有窗口句柄，可以作为 输人焦点并可以含有其他控件，如Edit组件。图形控件 没有窗口句柄，不能作为输入焦点，也不能含有其他控 件，如Label组件。 2非可视化组件（Nonvisual Component） 非可视化组件是指在程序运行期间用户是不可以看到的 ，是从TComponent但不是从TControl派生出来的子类。4.1 组件概述 4.1.2 组件的常用

3、属性及事件 在Delphi中，每一个组件都具有特定的属性、事件和方 法。组件的属性是组件特性的描述，包括组件的外观 特性（如位置、尺寸、外形、字体、可视性）和非可 视化的特性，组件常见的基本属性见表4-1。组件的事 件是对组件所做的某个动作或系统的某些行为（如按 下鼠标、双击鼠标、窗体装入等）的反应。每个组件 都提供满足用户的各类事件处理器，当发生特殊事件 时，应用程序将执行事件处理器中的代码。组件的常 用事件及触发条件见表4-2。组件的方法是指该类或对 象类型实例的函数或过程，每一类组件都有自己的方 法，以实现各种功能。4.1 组件概述表4-1 组件的常见基本属性属性含义 Height高度

4、Width宽度 Left组件在容器内的x坐标 Top组件在容器内的y坐标 Align组件上的对齐方式，居上、居下、居左、居右、占据剩余Visible设置组件是否显示，默认值为“true” Caption显示类组件的标题名称 Color显示组件的背景颜色 Font设置组件显示文本的字体 Ctl3D是否以3D方式显示组件，默认值为“true” ShowHint是否显示组件的提示信息，默认值为“true” Hint组件的提示信息 Enabled用户是否能够操作 Name机器内部对组件进行标识的名称 TabOrderTab次序4.1 组件概述表4-2 组件的常用事件及触发条件事件名触发条件 OnCli

5、ck当鼠标单击时触发本事件 OnDblClick当鼠标双击时触发本事件 OnMouseDown当鼠标左键按下时触发本事件 OnMouseMove当鼠标移动时触发本事件 OnKeyDown当按下任意键（包括组合键）时触发本事件 OnKeyPress当按下任意键（单字符键）时触发本事件 OnKeyUp当松开已按下键时触发本事件 OnEnter当获得焦点时触发本事件 OnExit当失去焦点时触发本事件 OnStartDrag当开始拖动时触发本事件 OnDragDrop当组件拖动操作结束时触发本事件4.2 文本输入类组件 4.2.1 TLabel组件TLabel标签组件位于组件面板的Standard选

6、项卡上（如图4-1） ，可以显示一个只读的字符串。通常利用TLabel标签组件在窗 体上显示静态文本，如显示提示信息；也可显示动态文本，如 用TLabel显示不断变化的当前时间。 1用途 TLabel组件主要用来标识应用程序中的其他对象，最常见的用 法是把标签放在其他组件的旁边，如放在文本框、Memo框及 单选按钮等组件的左侧或上方。标签上的文字信息有助于用户 操作，也可为用户提供信息。图4-1 组件面板上的Standard选项卡4.2 文本输入类组件2主要属性和方法 TLabel组件常用的属性见表4-1。下面介绍TLabel组件的主要属性和 方法。 (1) A1ign属性：该属性决定TLab

7、el组件的显示位置（使其位于窗口的 某个部分）。 (2) Alignment属性：该属性设置文字在水平方向的对齐方式。 (3) AutoSize属性：该属性决定标签的大小是否和文字保持一致，其 默认值为false，即标签的大小不随文字的大小而变化。 (4) Layout属性：该属性设置文字在垂直方向的对齐方式。 (5) TransParent属性：该属性决定标签是否透明显示，主要在图形操 作时使用，如果将其设置为true，则可透过标签看到背景图。 (6) WordWrap属性：该属性决定当Autosize属性为true时，文字超长 时的显示方式。该属性为true时，则文字在纵向方向扩展，以多行

8、显 示；为false时，则文字在横向方向扩展，以完全容纳文本内容。4.2 文本输入类组件 4.2.2 TEdit组件 TEdit文本框组件位于组件面板的Standard选项卡上（如 图4-1），可以显示、编辑单独的一行文本。 1用途 TEdit组件提供了一个编辑区域，用户可在区域中输入 单行信息。TEdit不但允许用户在文本框中输入数据， 也可以用来显示查询的数据及提示信息。 2主要属性和方法 (1) AutoSelect属性：该属性用来设置当TEdit组件获得输 入焦点时，自动选中所有的文本。若它的值为true，则 当Edit组件获得输入焦点时，自动选中所有的文本；若 它的值为false，则

9、当Edit组件获得输入焦点时，不自动 选中所有的文本。4.2 文本输入类组件(2) AutoSize属性：用于控制是否随字体的高度来改变编 辑框的高度。当AutoSize设置为true时，编辑框的高度会 自动适应输入文字的字体高度。但要注意，该属性只有 当BorderStyle属性设置为bsSingle时才有效。 (3) CharCase属性：该属性用于强制组件中的文本全部为 大写（或小写）字母。 (4) Enabled属性：该属性决定文本框中的内容是否可以 修改，其默认值为true，即文本框中的文本可以修改； 当它的值为false时其中的文本不能修改。 (5) Hint属性：该属性用来设置所

10、显示的提示信息。例 如通过将该属性设置为“请输入职工姓名”，并将 ShowHint属性设置为true，则在应用程序运行时当用户 将鼠标移到文本框并停顿片刻后，将显示引号中的提示 信息。4.2 文本输入类组件(6) IME属性：IME是输入法编辑器（Input Method Editor）的英文 缩写，通过设置该属性可以在输入焦点定位在Edit组件上时，自 动实现输入法的切换。 设置ImeMode属性：如果要设置为中文输入法，可以将ImeMode 属性设置为imChinese. 设置ImeName属性：可以通过下拉组合框选择一个具体的输入法 。 (7) PasswordChar属性：将用户输入的

11、所有字符以同一个字符显示 ，其默认值是“#0”，表示编辑框直接显示用户输入的字符；如果 将其设置为“*”，则不论用户输入什么，编辑框中都只显示“*”号 ，一般在键入密码时可以这样设置。 (8) Clear方法：该方法删除文本框中的所有文本。 (9) ClearSelect方法：该方法删除文本框中被选择的文本。如果文 本框中没有被选择的文本，则不删除任何内容。4.2 文本输入类组件 (10) CopyToClipboard方法：该方法将文本框中已选择 的文本拷贝到剪贴板上，并取代原来剪贴板中的所有 内容。如果用户未在文本框中选择任何文本，该方法 的执行将不删除原来剪贴板的所有内容。 (11) C

12、utToClipboard方法：该方法将文本框中已选择的 文本拷贝到剪贴板上，并取代原来剪贴板中的所有内 容，然后删除在文本框中被选中的内容。 (12) PasteFromClipboard方法：该方法将剪贴板上的内 容拷贝到文本框中，并插入到文本框中光标所在的当 前位置。 (13) SelectAll方法：该方法选择文本框中的所有文本。 Edit组件最常用的事件（也是默认事件）为OnChange ，一旦Edit组件中的文本内容发生了改变，就会触发 OnChange事件。4.2 文本输入类组件 【例4-1】设计用户登录验证的窗体，用来接收用户输 入的用户名和口令，单击“确定”按钮进行验证，根据

13、 输入是否正确显示相应的提示信息。 (1) 创建“人事管理”文件夹，用来保存该应用程序代 码。 (2) 创建一个工程RsglPrj.dpr，登录窗体设计界面如图 4-2所示，包含六个组件，即两个Label组件用于显示 提示信息；两个TEdit组件（UseName用于输入用户名 ，PassWord用于输入用户口令）；二个TButton组件。 (3) 组件的属性设置。登录窗体所包含的各组件的主要 属性设置见书表4-7。 (4) 编写DengLu窗体相应的程序代码。4.2 文本输入类组件图4-2 DengLu窗体的界面 (5) 按F9键运行程序。在用户名中输入“yonghu”，在口令中输 入正确的口

14、令“12345”，单击“确定”按钮，即可运行 。 (6) 保存程序。选择FileSave All选项，出现一个Save As对话 框，用户选择保存位置为“人事管理”文件夹，使用 DengLuUnit.pas对单元文件进行命名，使用RsglPrj.dpr对工程 文件进行命名。4.2 文本输入类组件 4.2.3 TMemo组件 TMemo备注框组件位于组件面板的Standard选项卡上（ 如图4-1），可以显示、编辑多行文本。 1用途 TMemo组件为用户提供了一种处理多行文本的方法，还 可用来快速阅读文件中的数据。尽管TLabel、TEdit和 TMemo组件有许多相似之处，但它们的使用场合却有

15、所 不同。如果只显示用户不能修改的信息，可采用标签； 如果用户只处理单行信息，则使用TEdit组件；如果用户 要处理多行文本，那么只能采用TMemo组件。 4.2 文本输入类组件 2主要属性 TMemo组件的很多属性（如MaxLength、ReadOnly和Text 等）和TEdit组件的属性类似，相同属性的含义不再赘述 。以下是TMemo组件的特殊属性。 (1) Lines属性：返回TMemo组件中文本的行数。 (2) ScrollBars属性：该属性用来设置TMemo组件是否有滚 动条。 (3) WantTabs属性：该属性用来设置是否可以使用Tab键来 进行文本编辑。其值设置为true，

16、这时可以用Tab键来使 TMemo组件获得输入焦点，但不能用Tab键从TMemo组件 切换到其他组件，默认值为false。4.2 文本输入类组件 4.2.4 TRichEdit组件TRichEdit组件和TMemo组件几乎完全相同，但是在TRichEdit组件中 的文字可以有多种字体、多种颜色。TRichEdit组件位于组件面板的 Win32选项卡上，如图4-3所示。图4-4 组件面板的Win32选项 卡 TRichEdit组件可以编辑多行的文本，它比TMemo的功能更强大，能够对 字体格式化和段落格式化，也能插入OLE文档，支持鼠标拖放，还可以搜 索和打印。它是一个相当完美的编辑器，保存的文件格式为RTF。但是 TRichEdit组件没有提供完整的用户界面，诸如打开、保存、打印、剪贴、 拷贝、搜索等操作，需要通过编程，