DELPHI 靜態陣列的定義方法

2021-04-23 04:23:24 字數 1709 閱讀 8245

靜態陣列的定義方法

//1. 標準方法:

var myarr: array[0..10] of integer; //定義靜態陣列

//2. 可以使用非0下標:

var myarr: array[9..10] of integer; //不能提倡,這樣不容易與系統函式溝通

//3. 根據預定義型別來宣告陣列:

type

tmyarr = array[0..10] of integer; //先定義乙個陣列型別

var myarr: tmyarr; //再定義靜態陣列

//4. 在非過程區可以直接賦值:

var myarr: array[0..2] of integer = (11,22,33);

//5. 多維陣列:

var myarr: array[0..2, 0..2] of integer;

begin

//使用

myarr[1,2] := 100;

end;

//6. 根據子界定義陣列:

type

trange = 0..10;

var myarr: array[trange] of integer;

//7. 根據列舉定義陣列:

type

tenums = (enum1,enum2,enum3);

var myarr: array[tenums] of

string;

begin

myarr[enum1] := '萬一';

showmessage(myarr[enum1]); //萬一

end;

//8. 根據其他型別定義陣列:

var myarr: array[byte] of char;

begin

myarr[255] := #65

; showmessage(myarr[255]); //a

end;

//應盡量不使用內建型別,可以新建型別:

type

tnewbyte = byte;

var myarr: array[tnewbyte] of char;

begin

myarr[255] := #65

; showmessage(myarr[255]); //a

end;

//也可以使用型別別名:

type

tchar = type char;

var myarr: array[tchar] of byte;

begin

myarr['c'] := 255;

showmessage(inttostr(myarr['c'])); //255

end;

//同時定義型別:

type

myrec = record

s: string;

r: real;

b: byte;

end;

var arr1: 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; //壓縮陣列定義, 好像沒有區別?

delphi定義二維陣列

procedure tform1.button1click sender tobject vara array of array of string i,j integer begin setlength a,10 for i low a to high a do begin setlength a...

python定義靜態方法

python沒有和c 中static關鍵字,它的靜態方法是怎樣的呢?還有其它語言中少有的類方法又是神馬?python中實現靜態方法和類方法都是依賴於python的修飾器來實現的。python view plain copy print?class myclass defmethod self pri...

陣列的動態和靜態定義

public static void main string args 2 指的是下標位第2 位,值是7,下標從0 開始 system.out.println arr3 2 system.out.println arr3.length 4 陣列的靜態定義 intarr4 new int 這種方式 不...