Delphi程序设计及实验指导(第二版)-第4章 常用组件

4.2 文本输入类组件
（10）ClearSelection方法：该方法删除文本框中被选择的文本。 如果文本框中没有被选择的文本，则不删除任何内容。 （11）CopyToClipboard方法：该方法将文本框中已选择的文本拷 贝到剪贴板上，并取代原来剪贴板中的所有内容。如果用户未在 文本框中选择任何文本，该方法的执行将不删除原来剪贴板的所 有内容。 （12）CutToClipboard方法：该方法将文本框中已选择的文本拷贝 到剪贴板上，并取代原来剪贴板中的所有内容，然后删除在文本 框中被选中的内容。 （13）PasteFromClipboard方法：该方法将剪贴板上的内容拷贝到 文本框中，并插入到文本框中光标所在的当前位置。 （14）SelectAll方法：该方法选择文本框中的所有文本。
Edit组件最常用的事件（也是默认事件）为OnChange，一旦 Edit组件中的文本内容发生了改变，就会触发OnChang
4.2 文本输入类组件
【例4-1】设计用户登录验证的窗体，用来接收用户输入的用 户名和口令，单击“确定”按钮进行验证，根据输入是否正 确显示相应的提示信息。
4.2 文本输入类组件
TLabel组件主要用来标识应用程序中的其他对象，最常见的用法是 把标签放在其他组件的旁边，如放在文本框、Memo框及单选按钮 等组件的左侧或上方。标签上的文字信息有助于用户操作，也可 为用户提供信息。
2．主要属性和方法 ．
TLabel组件常用的属性见前面的表4-1。下面介绍TLabel组件的主 要属性和方法。
4.2 文本输入类组件
（5）Hint属性：该属性用来设置所显示的提示信息。例如通过将 该属性设置为“请输入职工姓名”，并将ShowHint属性设置为true ，则在应用程序运行时当用户将鼠标移到文本框并停顿片刻后， 将显示引号中的提示信息。 （6）ImeMode属性：如果要设置为中文输入法，可以将ImeMode 属性设置为imChinese。 （7）ImeName属性：可以通过下拉组合框选择一个具体的输入法 。 （8）PasswordChar属性：将用户输入的所有字符以同一个字符显 示，其默认值是“#0”，表示编辑框直接显示用户输入的字符； 如果将其设置为“*”，则不论用户输入什么，编辑框中都只显示 “*”号，一般在键入密码时可以这样设置。 （9）Clear方法：该方法删除文本框中的所有文本。
了解组件的分类 掌握文本输入类常用组件的使用 掌握按钮类常用组件的使用 掌握列表类常用组件的使用
4.1 组件概述
4.1.1 组件分类
1．可视化组件（Visual Component） ．可视化组件（ ）
可视化组件在程序运行期间用户是可以看到的，也称为组件（ Control）。组件又有两种不同的类型，即基于窗口的组件和基于 图形的组件。基于窗口的组件（即窗口组件）是可以在运行时取 得焦点的组件，能够包含其他组件，拥有窗口句柄，如Edit组件。 图形组件没有窗口句柄，不能取得输入焦点，也不能包含其他组 件，如Label组件。图形组件在最小化使用系统资源方面起着关键 作用，特别是在那些频繁使用以及数量大的情况下最好使用图形 组件，如工具条按钮。
4.2 文本输入类组件
4.2.2 TEdit组件 组件
TEdit文本框组件位于组件面板的Standard选项卡上，如图4-1 所示，可以显示、编辑单独的一行文本。 1．用途 ．
TEdit组件提供了一个编辑区域，用户可以在区域中输入单行信息 。TEdit不但允许用户在文本框中输入数据，也可以用来显示查询 的数据及提示信息。
4.1 组件概述
4.1.2 组件的常用属性及事件
在Delphi中，每一个组件都具有特定的属性、事件和方法。组件的 属性是对组件特性的描述，包括组件的外观特性（如位置、尺寸 、外形、字体、可视性）和非可视化的特性，组件常见的基本属 性见表4-1。组件的事件是对组件所做的某个动作或系统的某些行 为（如按下鼠标、双击鼠标、窗体装入等）的反应。每个组件都 提供满足用户的各类事件处理器，当发生特殊事件时，应用程序 将执行事件处理器中的代码。组件的常用事件及触发条件见表4-2 。组件的方法是指属于该组件类或对象类型实例的函数或过程， 每一类组件都有自己的方法，以实现各种功能。
4.2 文本输入类组件
2．主要属性和方法 ．
（1）AutoSelect属性：该属性用来设置当TEdit组件获得输入焦点 时，自动选中所有的文本。若它的值为true，则当TEdit组件获得 输入焦点时，自动选中所有的文本；若它的值为false，则当TEdit 组件获得输入焦点时，不自动选中所有的文本。 （2）AutoSize属性：用于控制是否随字体的高度来改变编辑框的 高度。当AutoSize设置为true时，编辑框的高度会自动匹配输入文 字的字体高度。但要注意，该属性只有当BorderStyle属性设置为 bsSingle时才有效。 （3）CharCase属性：该属性用于强制组件中的文本全部为大写（ 或小写）字母。 （4）Enabled属性：该属性决定文本框中的内容是否可以修改， 其默认值为true，即文本框中的文本可以修改；当它的值为false时 其中的文本不能修改。
4.1 组件概述
组件的常用事件及触发条件
事件名 OnClick OnDblClick OnMouseDown OnMouseMove OnKeyDown OnKeyPress OnKeyUp OnEnter OnExit OnStartDrag OnDragDrop 触发条件 当鼠标单击时触发本事件 当鼠标双击时触发本事件 当鼠标左键按下时触发本事件 当鼠标移动时触发本事件 当按下任意键（包括组合键）时触发本事件 当按下任意键（单字符键）时触发本事件 当松开已按下键时触发本事件 当获得焦点时触发本事件 当失去焦点时触发本事件 当开始拖动时触发本事件 当组件拖动操作结束时触发本事件
4.2 文本输入类组件
4.2.4 TRichEdit组件 组件
TRichEdit组件和TMemo组件几乎完全相同，但是TRichEdit组 件中的文字可以有多种字体、多种颜色。TRichEdit组件位于 组件面板的Win32选项卡上，如图4-4所示。 TRichEdit组件可以编辑多行文本，它比TMemo的功能更强大 ，能够对字体格式化和段落格式化，也能插入OLE文档，支持 鼠标拖放，还可以搜索和打印。它是一个相当完美的编辑器 ，保存的文件格式为RTF。但是TRichEdit组件没有提供完整的 用户界面，诸如打开、保存、打印、剪贴、拷贝、搜索等操 作，需要通过编程，结合其他组件来完成。 TRichEdit的主要属性、事件和方法与TMemo基本相似，在功 能上TRichEdit更加丰富
4.1 组件概述
组件的常见基本属性
属性 Height Width Left Top Align Visible Caption Color Font Ctl3D ShowHint Hint Enabled Name TabOrder 含义 高度 宽度 组件在容器中的x坐标 组件在容器中的y坐标 组件上的对齐方式：居上、居下、居左、居右、占据剩余 设置组件是否显示，默认值为“true” 显示组件的标题名称 显示组件的背景颜色 设置组件显示文本的字体 是否以3D方式显示组件，默认值为“true” 是否显示组件的提示信息，默认值为“true” 组件的提示信息 用户是否能够操作 对组件进行标识的名称 Tab次序
4.2 文本输入类组件
在应用程序的界面上，往往需要用户输入文本数据，或者以 一定的格式将文本显示给用户，这时可通过文本输入类组件 来实现。
4.2 文本输入类组件
4.2.1 TLabel组件 组件
TLabel标签Βιβλιοθήκη 件位于组件面板的Standard选项卡上，如图4-1所 示，可以用来显示一个只读的字符串。通常利用TLabel标签组 件在窗体上显示静态文本，如显示提示信息，也可显示动态 文本，如用TLabel显示不断变化的当前时间。 1．用途 ．
2．非可视化组件（Nonvisual Component） ．非可视化组件（ ）
非可视化组件是指在程序运行期间用户看不到的组件，它们是从 TComponent但不是从TControl派生出来的子类。非可视化组件主 要用来向其他组件或整个应用程序提供某种服务，在设计时无需 考虑它们在窗体中的位置。非可视化组件一般以图标形式显示， 最典型的一个非可视化组件是定时器组件（TTimer）。
编写DengLu窗体相应的程序代码。 将组件添加到DengLu窗体后，编写相应的程序代码。 (*定义2个unit级符号常量*) const iusename='yonghu'; //定义用户名 ipassword='12345'; //定义口令 双击“确定”按钮，在代码编辑区中输入该按钮的OnClick事件处理代码： procedure TDengLu.BtnOKClick(Sender:TObject); begin if ( usename.text=iusename)and(password.text=ipassword) then MessageDlg('欢迎使用教师人事档案系统！', mtInformation, [mbOK], 0) else MessageDlg('对不起，您不是合法用户！请重新输入用户名和密码', mtInformation, [mbOK], 0); end; 双击“取消”按钮，在编辑区输入该按钮的OnClick事件代码： procedure TDengLu.BtnCancelClick(Sender: TObject); begin close; End;
第4章 常用组件
导读 4.1 组件概述 4.2 文本输入类组件 4.3 按钮类组件 4.4 列表类组件 小结 习题
导读
在使用Delphi 8 for .NET开发应用程序时将广泛地使用 到组件。可视化组件库（Visual Component Library， 简称VCL）是Delphi中最重要的部分，通过VCL可以在 窗体中方便地构建供用户交互的界面。 本章将主要介绍Delphi常用组件的基本功能及主要属 性、方法等内容。 学习目标：