background image

  在光标处键入以下的程序段: 
  

Shape1.Shape := stRectangle; 

  用同样的方法,在

Button2 和 Button3 的 OnClick 事件响应内复制以上语句,并分别将

赋值号后的属性值改为

stRoundRect 和 stEllipse。为防止输入错误导致程序运行出错,建议

您使

Shape1 部件的 Object Inspector 可见,检视属性 Shape 的各个值并对应输入。

  在代码编辑器中,

Delphi 自动建立的过程以关键字 Procedure 开头,用户可以在

begin

…end 之间加入自己的程序,也可以定义变量。这个程序块对用户的外部事件(此例中

是按动按钮

)进行响应。我们称之为事件处理过程。 

1.2.5.2 使用颜色编辑对话框 
  图标按钮

“Color”要控制部件 Shape1 的颜色,我们可以调入颜色编辑对话框,用以选

择要变成的颜色。这时就要用到运行时不可视的部件

ColorDialog 了。同样地使图标按钮

BitBtn1 响应 OnClick 事件,在它的过程中加入以下的语句:
  

ColorDialog1.Execute;

  

Shape1.Brush.Color := ColorDialog1.Color; 

这样,图标按钮的功能也就完成了。
  初学者可能对这样的程序段不能理解。其实也是十分简单的。查看

ColorDialog 的 Brush

属性,就会发现它是个集属性,在其下还有一个

Color 选项,正是我们想改变的属性。既然

我们想将图形的颜色变得更加丰富多彩,它本身提供的几种颜色就已不能满足要求了。用颜
色编辑器可以得到更多的色彩。程序的第一句用

Execute 方法,使得 ColorDialog 运行它本身。

当用户在对话框中进行操作,选定了一种颜色时,即使得

TColorDialog 对象的一个属性

Color 置为选定颜色的值。将此值赋给 Shape1 的 Brush 属性的子属性 Color,就将选定的颜
色加到了图形上。
读者的要求可能会是,怎样尽快的了解这些这些方法、属性和域呢?下文对使用联机帮助的
简单介绍可能会对您有所裨益。
  

1.2.6 使用联机帮助 Help 

  事实上,使用联机帮助是您全面地了解可用的方法、对象的域、属性等信息的最快捷途
径。您还可以参考

Delphi 给定的例程。较为简单有效的方法是使用 Help 中的搜索功能。如果

您对一个对象知之甚少,选用主菜单中的

Help|Help Topics 项,在弹出的帮助对话框,选用

Indexes(

“索引”)页,Delphi 2.0 会提示您输入要检索的主题。以您想用的部件的对象名作为

检索主题词,可以参阅很多基本的信息。例如,上文的例程中,在编辑框中键入对象的名称
TColorDialog,在词条中就会出现该主题,按动 Display 按钮显示出 TColorDialog 的帮助信
息。查看

method,可以找到能应用在 CclorDialog1 上的方法 Execute;仔细阅读它的功能,上述

的编程便不难理解了。

Properties 中提供了部件的所有属性,在关键属性 Key Properties 前加

上了

“金钥匙”,提供了详尽的说明。在 Task 中您可以查阅该对象的其它相关主题,还可以

参阅

Example 中的应用例程。用帮助窗口的 Edit 各种功能进行复制、剪贴等操作。

如果您已经对对象有一定的了解,想查阅它的具体方法、域等,可以直接用主题词进行检索。
 

以上,我们已经完成了简单的例程。运行您的程序,选用各个按钮改变图形的颜色和形

状。如图

1.9 所示。虽然它只是一个

“小玩具”,却直观地给您一个用 Delphi 编程的印象。对比

一下您亲手编制的程序量和程序的功能,您就会理解

Delphi 为程序员提供了怎样的方便。

1.3 Delphi 2.0 的可视化部件用法简介 
  本节中,我们将较为深入地讲解

Delphi 的部件。这是编制大型复杂应用程序的必

由之路。下面,我们将对各种部件分类进行简单的介绍,以便于您在编程时能够较快地了解