使用静态数组应该注意的问题

核心提示：一：使用静态数组应该注意的问题： 1：char静态数组用在全局变量和局部变量中的区别， 您可以编写如下简单的测试，使用静态数组应该注意的问题，此时 PRocedure TForm1.Button1Click(Sender: TObject); var ArrayChar:array[1..100] of char;

一：使用静态数组应该注意的问题：

 1：char静态数组用在全局变量和局部变量中的区别。

 您可以编写如下简单的测试，此时

 PRocedure TForm1.Button1Click(Sender: TObject);
  var
  ArrayChar:array[1..100] of char;
 begin
 {point1}　 ArrayChar[1]:='a';
 {point2}　 ArrayChar[100]:='6';
　
end;
  你可以在point1处设置断点，使用鼠标观察，运行到该处之前DELPHI 为
  数组ArrayChar分配内存的情况，可以看到，DELPHI在开始分配数组时，
  并不为所有的元素置空，应该是随机分配值的，如果试图进行这样的操作，
  你如果不理解这一点，在进行某些操作时就可能会感到很迷茫：例如
procedure TForm1.Button1Click(Sender: TObject);
var
 ag :array[1..100] of char;
 i:integer;
begin
　  ArrayChar[1]:='a';
　  ArrayChar[99]:='6';
　  for i:= low(ArrayChar) to high(ArrayChar) do
　　  if ag[i]='6' then
　　　　 showmessage(inttostr(i));
end;
  你希望能够找到的i 的值是 99 ，但是有可能就会得到的是错误的值，我
 进行了小小的测试，我此时得到的值是 64，94，最后才是99，如果稍加修改，如下：

procedure TForm1.Button1Click(Sender: TObject);
var
 ArrayChar:array[1..100] of char;
 i:integer;
 j:integer;
begin
  for j:=low(ArrayChar) to high(ArrayChar) do
　　 ArrayChar[j]:=#0;

　  ArrayChar[1]:='a';
　  ArrayChar[99]:='6';
　  for i:= low(ArrayChar) to high(ArrayChar) do
　　  if ArrayChar[i]='6' then
　　　　 showMessage(inttostr(i));
end;
  这时，就不会出现先前的情况了，如果你仔细仍然可以使用同样的方法观察动态数组，会发现其实
动态数组在开始初始化时，是已经将所有的值都置空的。如果是整形的静态数组的话，应该设置值为0，
而不是#0。

不过以上的情况是静态数组是局部变量，你可以试着把它放到程序的前面，使它成为一个全局变量，你可以
再进行观察，可以发现这是，delphi已经把所有元素自动置空，这种情况下，你就不需要考虑静态数组的
初始化问题了。

对于字符串数组，两种情况下，初始化时都已经清空了，不需要你去做初始化工作

二：关于动态数组的越界问题如下：
 procedure TForm1.Button1Click(Sender: TObject);
 var
　 ArrayDy:array of char;
begin
　 setlength(ArrayDy,100);
　 ArrayDy[0]:='a';
　 ArrayDy[1]:='b';
　 ArrayDy[99]:='c';
　 ArrayDy[100]:='d';//error! 越界
　 ArrayDy[101]:='e'; //error!越界
　 showmessage(ArrayDy[101])
end;
  这是虽然数组ArrayDy[100],ArrayDy[101]都已经越界，但是程序却照常运行。要能够让DELPHI能够做出
提示，可以打开：Project \Options\complier\range checking开关。