一:使用靜態數組應該注意的問題:
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開關。
新聞熱點
疑難解答