第三章顺序结构.docVIP

3.1?? 与输入/输出有关的控件一个程序，如果没有输出操作则没有什么实用价值，而如果没有输入操作，则必然缺乏灵活性。因此，输入与输出是应用程序最基本的功能。??? 在标准（Standard）组件板中，Delphi 提供了最为基本的输入/输出控件： 标签（Label）控件、编辑框（Edit）控件进行多行输入的备注框（Memo）控件。掩码编辑框（MaskEdit ）控件 3.1.1?? Label控件标签（Label）是Delphi 中最常用的输出文本信息的工具。与早期Pascal 语言中的Write输出语句相比，标签更加灵活与方便。 1. 标签的 常用属性 2. 使用标签 【例3-1】使用标签控制文本的输出 【例3-2】利用标签设计并控制文本的投影效果 1. 标签的常用属性? 标签在Delphi中用TLabel类处理，其主要属性见下表。 属性名 属性类型 说明 Caption? String? 标签所显示的文本 ShowAccelChar? Boolean? 决定是否将作为热键字符的标记 AutoSize Boolean? 决定标签是否自动随文本的变化而改变大小 Alignment 枚举型 对齐方式：左对齐、居中对齐、右对齐 Layout 枚举型 文本显示在标签的顶部、中部、底部 WordWrap Boolean? 是否折行显示 Transparent Boolean 背景是否透明 FocusControl TwinControl 设置按下热键时，获得焦点的控件名 ? 2. 使用标签 ??? Label 控件显示的文本用户不能直接修改。有些没有自己的标题（Caption）属性的控件（如Edit等）可以用Label标识，Label中显示的文本是由Caption属性控制的，可以在设计时通过“属性”窗口设置或在运行时用代码对其赋值。 【例3-1】使用标签控制文本的输出 设计要求： 　 设计步骤： （1） 建立应用程序拥护界面。选择“新建”工程，进入窗体设计器，增加一个标签Label1和一个按钮Button1。如下图 (2) 设置对象属性，见下表 对象 属性 属性值 说明 Button1 Caption 日期（D） 按钮的标题 Font.Name 宋体 字体名称 Font.Size 11 字体大小 Label1 Caption 聪明的程序员使用Delphi? 标签的内容 Color clAque 标签的背景色 Font.Color clRed? 字体颜色 Font.Name 隶书 字体名称 Font.Size 24 字体大小 Font.Style.fsBold? True? 粗体字 适当调整标签与按钮的位置，如下图所示。 (3) 编写程序代码。编写按钮Button1的单击（OnClick）事件代码： procedure TForm1.Button1Click(Sender: TObject);begin? ? Label1.Caption:= FormatDateTime(今天是: + #13 + dddddd, Date);?? Label1.Left:= (Form1.Width - Label1.Width) div 2; end;说明：控件的Left属性表示该控件的左边位置，通过改变属性值，可以控制控件的左右位置。另外，控件的Top属性可以用来控制控件的上下位置。 【例3-2】利用标签设计并控制文本的投影效果 设计要求： 设计步骤如下： (1) 建立应用程序拥护界面。选择“新建”工程，进入窗体设计器，增加两个标签Label1~Label2和两个按钮Button1~Button2.如下图。 (2) 设置对象属性 对象 属性 属性值 说明 Button1 Caption 左光源（L） 按钮的标题 Font.Name 宋体 字体名称 Font.Size 11 字体大小 Button2 Caption 右光源（R） 按钮的标题 Font.Name 宋体 字体名称 Font.Size 11 字体大小 Label1 Caption ?欢迎使用Delphi网页课件 标签的内容 Font.Name 隶书 字体名称 Font.Size 24 字体大小 Font.Style.fsBold? True? 粗体字 Label2 Caption ? 欢迎使用Delphi网页课件 标签的内容 Font.Color clYellow? 字体颜色 Font.Name 隶书 字体名称 Font.Size 24 字体大小 Font.Style.fsBold? True? 粗体字 Trans