Delphi快速入门教程(三)

1、如果您的 Windows95系统中安装了中文系统, 对界面做汉化是极其方便的。 例如, 您可 以将 Button1的 Caption 属性改成“&R矩形”,同样地可改变其它部件的属性,将窗体做 成中文的操作界面。若对中、西文字体不满意,则可以调整 Font 属性以满足您的要求。 Font 属性的前面, 有一个小小的“+”号,这说明它表征的是集属性,也即属性不再是一个单值,而是一个属 性的集合。双击 Font , Object Inspector将在下面扩充显示它的其它属性。 Color 用来表 示文本的颜色, Name 定义了字体名,如 System,MsSerif,Arial, 宋体

2、,黑体等。 Style 下又 拥有四个属性:fsBold,fsItalic,fsUnderline 和 fsTrikeOut 。 如果想让字体有其中的某种 风格,可把相应的属性值设成 True 。Font 对话框可以更为直接地设定以上属性。 Font 属性右侧值段有带省略号的按钮,单 击它可以激活 Font 对话框,如图 1.7所示:这一对话框中包含了上述的全部属性, 使得调整字形更为直接方便。 但要申明的是, 对 于窗体 Form 来讲, Font 属性改变的是窗体中其它部件的显示字形,它本身的标题字体是缺 省的 System 字体,不能通过属性来改变。最后,我们用图标按钮 BitBtn1来

3、控制 Shape 部件的颜色。选中图标按钮,将它的 Cap tion 属性改为“&Color”(或“&C颜色”。可以在按钮中加入一个图标来形象地表述它的 功能。选用 Object Inspector中的 Glyph 属性,点动值段的三点按钮,弹出图形编辑对话 框。您可以通过图形编辑对话框装入图标,在本例程中,按动 Load 按钮,选择 Delphi 2. 0ImagesButtonsBrush.bmp文件装入, Bitbtn1就成为一个图标按钮。另外, Delphi 还 为您提供了丰富的 Windows 标准图标按钮。 想运用它们, 改变 BitBtn 的 Kind 属性。 用

4、户不 妨尝试一下, 选择其它值可以生成漂亮的标准按钮, 如 OK,Cancel 等等。 这会使您在以后的 程序开发中受益匪浅。至此,界面的设计工作就已完成了。运行一下观察效果,别忘记保存您的库单元文件、 工程文件。完成用户界面, 只是建立了一个 “骨架” , 下面要做的便是给程序加入 “灵魂” , 也即, 使它能够完成所要求的功能。单击窗体上的 “Rectangle” 按钮,在 Object Inspector中,点动 “Events” 页标签,出现事件 窗口。 在本例程中, 我们只关心 OnClick 事件, 即按钮接收到左键单击时应用程序所作出的反应。在 Object Inspector

5、窗口中双击 OnClick 事件右端的值段,会使得 Delphi 激活库代码 编辑器, 并将光标停在该按钮所对应的过程的 begin.end 之间。 “Rectangle” 按钮的功能是使 Shape 部件的形状为矩形。 联系前文我们查看过的 Shape 部件的 “Shape” 属性, 现在, 我们要 做的是在程序中控制部件的属性。在光标处键入以下的程序段:Shape1.Shape := stRectangle;用同样的方法,在 Button2和 Button3的 OnClick 事件响应内复制以上语句,并分别将 赋值号后的属性值改为 stRoundRect 和 stEllipse 。为防止输

6、入错误导致程序运行出错,建议 您使 Shape1部件的 Object Inspector可见,检视属性 Shape 的各个值并对应输入。在代码编辑器中, Delphi 自动建立的过程以 关键字 Procedure 开头,用户可以在 beginend 之间加入自己的程序,也可以定义变量。这个程序块对用户的外部事件 (此例中 是按动按钮 进行响应。我们称之为事件处理过程。图标按钮 “Color” 要控制部件 Shape1的颜色,我们可以调入颜色编辑对话框,用以选择 要变成的颜色。 这时就要用到运行时不可视的部件 ColorDialog 了。 同样地使图标按钮 BitBtn1响应 OnClick 事

7、件,在它的过程中加入以下的语句:ColorDialog1.Execute;这样,图标按钮的功能也就完成了。初学者可能对这样的程序段不能理解。 其实也是十分简单的。 查看 ColorDialog 的 Brush 属性,就会发现它是个集属性,在其下还有一个 Color 选项,正是我们想改变的属性。既然 我们想将图形的颜色变得更加丰富多彩, 它本身提供的几种颜色就已不能满足要求了。 用颜 色编辑器可以得到更多的色彩。程序的第一句用 Execute 方法,使得 ColorDialog 运行它本 身。当用户在对话框中进行操作,选定了一种颜色时,即使得 TColorDialog 对象的一个属 性 Colo

8、r 置为选定颜色的值。将此值赋给 Shape1的 Brush 属性的子属性 Color ,就将选定的 颜色加到了图形上。读者的要求可能会是, 怎样尽快的了解这些这些方法、 属性和域呢?下文对使用联机帮 助的简单介绍可能会对您有所裨益。事实上, 使用联机帮助是您全面地了解可用的方法、 对象的域、 属性等信息的最快捷途 径。您还可以参考 Delphi 给定的例程。较为简单有效的方法是使用 Help 中的搜索功能。如果您对一个对象知之甚少,选用主菜单中的 Help Help Topics 项,在弹出的帮助对话框, 选用 Indexes(“ 索引 ” 页, Delphi 2.0会提示您输入要检索的主题

9、。以您想用的部件的对象名 作为检索主题词, 可以参阅很多基本的信息。 例如, 上文的例程中, 在编辑框中键入对象的 名称 TColorDialog ,在词条中就会出现该主题,按动 Display 按钮显示出 TColorDialog 的帮 助信息。 查看 method, 可以找到能应用在 CclorDialog1上的方法 Execute; 仔细阅读它的功能, 上述的编程便不难理解了。 Properties 中提供了部件的所有属性,在关键属性 Key Properties前加上了 “ 金钥匙 ” ,提供了详尽的说明。在 Task 中您可以查阅该对象的其它相关主题,还 可以参阅 Example 中

10、的应用例程。用帮助窗口的 Edit 各种功能进行复制、剪贴等操作。如果您已经对对象有一定的了解, 想查阅它的具体方法、 域等, 可以直接用主题词进行 检索。以上, 我们已经完成了简单的例程。 运行您的程序, 选用各个按钮改变图形的颜色和形 状。如图 1.9所示。虽然它只是一个 “ 小玩具 ” ,却直观地给您一个用 Delphi 编程的印象。对 比一下您亲手编制的程序量和程序的功能, 您就会理解 Delphi 为程序员提供了怎样的方便。 1.3 Delphi 2.0的可视化部件用法简介本节中,我们将较为深入地讲解 Delphi 的部件。这是编制大型复杂应用程序的必由之 路。 下面, 我们将对各种

11、部件分类进行简单的介绍, 以便于您在编程时能够较快地了解有哪 些部件可能会满足您的要求,并对其重要的方法、属性等有一个大致的了解。基本技巧、工具的介绍在本章的第 4节中,交互阅读这两部分,多创制几个试验程序, 有助于您迅速进入 Delphi 世界,尽早将这一精妙软件用于实际工作中。以下的部件以各种格式显示文本, 其中有些是文本和数据输入的途径。 它们是 Label(标 签 、 Edit(文本编辑 、 MaskEdit(格式编辑 、 Memo(备注 、 List Box(列表框 、 Combo Box(组 合框 。除了 MaskEdit 在 Additional 页之外,其它的都在 Standa

12、rd 页中。Label(标签 一般放在对象的旁边, 用来标记这些对象, 从而对用户的操作进行提示, 也 可以用来显示其它信息。 您可以在标签中设置热键, 也即在 Caption 属性值段中输入含有 “&” 的字串,当用户使用 “Alt+关键字母 ” 时,将自动选中它所指向的对象。方法是设置 Label 部 件的 FocusControl 属性,在值段中,选用与它关联对象的对象名。Edit 、 MaskEdit 、 Memo 部件都是用作接收、显示用户输入文本的。它们具有一些相同 的属性。 ReadOnly 在运行时间内控制对象是否可以进行 Windows 的操作,当此值为 False

13、时, 该框内的文本就不能被复制到剪贴板上。 MaxLength 可以设置输入文本的长度限制。 用 PasswordChar 属性可以按照显示隐蔽密码的方法显示用户输入文本,例如,它的缺省值为 “*” ,运行时,您的输入将用 “*” 来显示,从而提供了一种安全措施。您可能也发现了,当一个字段被加上高亮度显示时, 按键操作会将这一字段删除, 替换成当前的键盘输入。 这种设 置为操作提供了方便,您不必每次先删除原来的文本;但也可能会导致误删文本。将 AutoSelect 属性设置成 False ,这种替代功能就被取消了。MaskEdit 是格式文本输入对象。它的 EditMask 属性为它提供了过滤

14、文本的格式。点动这一 属性的省略按钮,会弹出过滤编辑对话框,除了 Delphi 为您提供的几种屏蔽格式,您也可 以自己编写,查阅 “ 帮助 ” ,会为您提供更详细的用法介绍。Memo 是备注框,与以上对象不同的是,它可以接收多行文本输入。将 ScrollBars 设置 成 ssV ertical , 可以为它加上一个垂直的滚行条。 Align 属性调整该对象在窗口中的对齐情况, 有 alNone(无对齐指定 、 alBottom(底部对齐 、 alClient(全窗口显示 等可以选择; 而 Alignment 属性则决定了文本在框中的对齐显示格式。 Lines 属性访问的文本被存储在一个 TS

15、trings 对 象中, 按动它的省略按钮, 可以通过对话框向它增加文本, 也可以用程序对这一属性进行操 作,以达到修改或增加备注文本的目的。List Box(列表框 和 Combo Box(组合框 都显示列表项目, 所不同的是组合框占用较少的 空间。常见的 Windows 操作系统中,显示可用磁盘驱动器时,用的就是组合框。列表框则 提供了一个项目列表以供选择,如 Windows 打开文件操作时显示文件列表的就是 List Box。下列程序段将 Edit1的文本加入到 ListBox1中,并清空 Edit1中的文本:procedure TForm1.AddButtonClick(Sender:

16、TObject;beginEdit1.Text := ;end;常见的组合框初始化用以下的语句可以实现, 它用下拉式列表框的第一项来初始化组合框的 缺省值:procedure TForm1.ComboBox1Text(Sender:TObject;beginif ComboBox1.Text = thenend;以上就是文本输入的基本部件。按钮是 Windows 常用的部件, 前文的例程中我们已经基本掌握了 Button 和 BitBtn 的主 要用法。 它们一般用在对话框中, 做为执行某种功能的指示。 您也可以为它们设置内置返回 功能,将 ModelResult 属性加以匹配,可以不用编程,

17、直接实现系统内置的功能,这一点上 和 Kind 属性颇类似。Speed Button(加速按钮 部件在 Additional 页上, 是进行工具条快速设计的理想部件。 它 只有一个位图, 没有标题。 需要提起读者注意的是, 用多个 Speed Button制作一个工具条时, 必须先放置一个窗口类部件,如 Panel(操作板 、 Group Box(群组框 等。否则试图将加速按 钮先制作好再移上去, 您会发现它会总是处于窗口类部件下面不可见。 当然, 您可以对加速 按钮进行复制、粘贴到窗口类部件上处理,那就另当别论了。Check Box(检查框 和 Radio Button(无线按钮 部件通常是相提并论的,多用作接收用户 “ 是 ” 或 “ 否 ” 的输入判别。它们一般都是成组的放置在 Radio Group或 Group Box部件中。所 不同的是, 成组的 Radio Button是 “ 互锁 ” 的, 用户选择定一个后, 其它的将自动设置为不选; 而 Check Box部件则是分立的,您可以同时选中其中的几个,也可以一个都不选。Group Box(群组框 、 Radio Group(选项按钮组 部件都可以将部件分类、 成组。 它们都有 标题,可以用文字表征成组部件的标题或信息。 Rad