静态数组的定义方法
//1. 標(biāo)準(zhǔn)方法:
varMyArr: array[0..10] of Integer; //定義靜態(tài)數(shù)組//2. 可以使用非0下標(biāo):
varMyArr: array[9..10] of Integer; //不能提倡,這樣不容易與系統(tǒng)函數(shù)溝通//3. 根據(jù)預(yù)定義類(lèi)型來(lái)聲明數(shù)組:
typeTMyArr = array[0..10] of Integer; //先定義一個(gè)數(shù)組類(lèi)型
varMyArr: TMyArr; //再定義靜態(tài)數(shù)組//4. 在非過(guò)程區(qū)可以直接賦值:
varMyArr: array[0..2] of Integer = (11,22,33);//5. 多維數(shù)組:
varMyArr: array[0..2, 0..2] of Integer;
begin//使用MyArr[1,2] := 100;
end;//6. 根據(jù)子界定義數(shù)組:
typeTRange = 0..10;
varMyArr: array[TRange] of Integer;//7. 根據(jù)枚舉定義數(shù)組:
typeTEnums = (Enum1,Enum2,Enum3);
varMyArr: array[TEnums] of string;
beginMyArr[Enum1] := '萬(wàn)一';ShowMessage(MyArr[Enum1]); //萬(wàn)一
end;//8. 根據(jù)其他類(lèi)型定義數(shù)組:
varMyArr: array[Byte] of Char;
beginMyArr[255] := #65;ShowMessage(MyArr[255]); //A
end;//應(yīng)盡量不使用內(nèi)建類(lèi)型,可以新建類(lèi)型:
typeTNewByte = Byte;
varMyArr: array[TNewByte] of Char;
beginMyArr[255] := #65;ShowMessage(MyArr[255]); //A
end;//也可以使用類(lèi)型別名:
typeTChar = type Char;
varMyArr: array[TChar] of Byte;
beginMyArr['C'] := 255;ShowMessage(IntToStr(MyArr['C'])); //255
end;//同時(shí)定義類(lèi)型:
typeMyRec = records: string;r: Real;b: Byte;end;
varArr1: array[0..100] of MyRec;Arr2: array[0..100] of record s: string; r: Real; b: Byte; end; //可以直接這樣定義Arr3: packed array[0..100] of MyRec; //壓縮數(shù)組定義, 好像沒(méi)有區(qū)別?
轉(zhuǎn)載于:https://www.cnblogs.com/del/archive/2007/12/10/988804.html
總結(jié)
- 上一篇: C# .net IDE Rider入门
- 下一篇: 从今天起开始认认真真的写博客