2011计算机等级考试Delphi面向对象的编程方法

　　2.1.7 关于作用范围

　　2.1.7.1 标识符的作用范围

　　一个变量、常量、方法、类型或其他标识符的范围定义了这个标识符的活动区域。对于说明这个标识符的最小程序模块而言，此标识符是局部的。当您的应用程序在说明一个标识符的程序模块外执行时，该标识符就不在此范围内。这意味着此时执行的程序无法访问这个标识符，只有当程序再度进入说明这个标识符的程序模块时，才可以访问它。

　　下面的示意图表示一个含有两个库单元的工程，每个库单元中又各有三个过程或事件处理过程。

　　2.1.7.2 访问其他程序模块中的说明

　　您可以在当前的程序模块中访问其他程序模块中的说明。例如您在库单元中编写一个事件处理过程来计算利率，则其他的库单元可以访问这个事件处理过程。要访问不在当前库单元中的说明，应在这个说明之前加上其他应用程序的名称和一个点号(.)。例如，在库单元Unit1中有事件处理过程CalculateInterest过程，现在您想在库单元Unit2中调用这一过程，则可以在Unit2的uses子句中加入Unit1，并使用下面的说明：

　　Unit1.CalculateInterest(PrincipalInterestRate : Double);

　　应用程序的代码不能在一个模块外访问它说明的变量。事实上，当程序执行跳出一个模块后，这些变量就不存在于内存中了。这一点对于任何标识符都是一样的，不管事件处理过程、过程、函数还是方法，都具有这一性质。这样的标识符称为局部变量。

　　2.1.7.3 按照作用范围说明标识符

　　您可以在应用程序的不同地方说明一个标识符，而只需保证它们的有效范围不同即可。编译器会自动访问最靠近当前范围的标识符。

　　库单元的全局变量一般可以说明在保留字implementation后面。例如，下面的例程实现将两个编辑框中的整数相加，显示在第三个编辑框中。用到了一个整形的全局变量Count：

　　…implememntation

　　var

　　Count : Integer;

　　procedure TForm1.AddClick(Sender:TObject);

　　var

　　FirstNumber,SecondNumber:Integer;

　　begin

　　Count := Count + 1;

　　Counter.Text := IntToStr(Count);

　　FirstNumber := StrToInt(Edit1.Text);

　　SecondNumber := StrToInt(Edit2.Text);

　　Edit3.Text := IntToStr(FirstNumber+SecondNumber);

　　end;

　　…

　　为了实现每按动一次按钮Count增加一次，必须对全程变量Count进行初始化处理。在程序库单元的结尾处，最后一个end.保留字之前，加入保留字initialization和初始化Count的代码：

　　…

　　initialization

　　Count := 0;

　　这样当事件处理过程AddClick被触发时，Count就会被增加一次，以表征计算次数。如果用面向对象编程，则Count可以说明成窗体的一个域，这在下一节中将有讲述。