delphi5中的全局integer数组是否系统会自动初始化为0

Question

会的.
一般在implement的后面就可以了.

Answer 1

全局变量一般在哪里定义implement的前后都可

Answer 2

可以。
如在一个unit中，implement的后面就可以了，如在一个project中，定义在implement的前面（Interface之后）。

Answer 3

在implement的前面定义的可以被其他单元所引用/修改.
在implement的后面定义的只可以被该单元使用.

Answer 4

全局变量在interface之后implementation之前定义。
例如：unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;var
  TestInt1: Integer;//全局变量type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;//全局变量
  TestInt2: Integer;//全局变量implementation{$R *.DFM}end.

Answer 5

是的，全局数组亦被初始化为零还有 implementation 后定义的变量也算是全局变量（狭义的）相对过程内的局部变量而言

Answer 6

做了个试验，发现interface 后定义的全局数组不能完全初始化为0

Answer 7

to snowrain(雪雨) 我做的测试如下：
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;
  gdAry: array[0..99]of integer;implementationvar
  a, b: integer;
  c, d: Double;
  ingdAry: array[0..99]of integer;{$R *.DFM}  function SumIntArray(ary: array of Integer): Integer;
  var I: integer;
  begin
    Result := 0;
    for i:=Low(ary) to High(ary) do
      Result := Result + ary[i];
  end;procedure TForm1.Button1Click(Sender: TObject);
var
  lcAry: array[0..50]of integer;
  msg: string;
begin
  msg := 'before implementation sum value:'  + IntToStr(SumIntArray(gdAry)) +
        #13#10;
  msg := msg +  'in implementation sum value:'  + IntToStr(SumIntArray(ingdAry)) +
        #13#10;
  msg := msg +  'Locate sum value:'  + IntToStr(SumIntArray(lcAry)) +
        #13#10;
  showmessage(msg);
end;end.

Answer 8

全局数组肯定被初始化为零，
但局部数组不会。implementation 前的全局数组外部Unit也可以引用，
implementation 后的全局数组外部Unit不可以引用。定义了全局数组的Unit中的类最好不要在一个Application中出现多了实例，
否则会导致不确定值。

Answer 9

在詷用前设个断点，用F4运行，把MOUSE移到哪个变量上，就会出现变量的大小,哪就知是不是.了。