在函数中如果数组的个数不定,可以使用开放数组参数 实参可以接受静态数组和动态数组 procedure p1(a:array of Byte); begin ShowMessage( IntToHex( Integer(@a),2)); ShowMessage(IntToStr(a[0])); end; procedure TForm1.btn1Click(Sender: TObject); var a:array[0..5] of Byte; begin ShowMessage(IntToHex
这是一个实例: procedure TMainForm.Button1Click(Sender: TObject);var arr:array of array of string;begin setlength(arr,2,3); arr[1,2]:='this is a test'; setlength(arr,0,0); setlength(arr,4,5); showmessage(arr[1,2]); end; 声明一个二维数组的方法是用 array of array of
这是一个实例: procedure TMainForm.Button1Click(Sender: TObject);var arr:array of array of string;begin setlength(arr,2,3); arr[1,2]:='this is a test'; setlength(arr,0,0); setlength(arr,4,5); showmessage(arr[1,2]); end; 声明一个二维数组的方法是用 array of array of
动态数组数组名代表的是第一个元素的内存地址. 静态数组名称代表的是数组第一个元素的内存位置, 而不是数组第一个元素的内存地址. 但对于静态数组,在某些情况下编译器可能会自动取数组地址,如: function GetWinClassName(hwnd:HWND):string; var buf1 : ..] of Char; buf2 : ..] of Char; begin SetString(Result,buf1,GetClassName(hwnd, buf1, )); SetString(
type TArr = array of TPoint; {把数组先定义成一个类型会方便许多, 这里仅用 TPoint 测试} {删除动态数组指定元素的过程: 参数 arr 是数组名, 参数 Index 是要删除的索引} procedure DeleteArrItem(var arr: TArr; Index: Integer); var Count: Cardinal; begin Count := Length(arr); if (Count = 0) or (Index < 0) or (
type TComplex = record Real : Single; Imag : Single; end; TKArray=array [1..2048,1..2048] of TComplex; varlcArr:TKArray;lcC:Integer; lcArr2:Array of Array of TComplex;beginMemo1.Lines.Clear;Memo1.Lines.Add('TKArray [2048 x 2048]:');lcC:=SizeOf(lcArr)
procedure TForm1.Button1Click(Sender: TObject);type TArr = array [0..0] of Integer; PArr = ^TArr;var arr: PArr; i: Integer;begin GetMem(arr, 100); for i := 0 to 100 - 1 do arr[i] := i; for i := 0 to 100 - 1 do OutputDebugString(PChar(For
dctb:array[1..2,1..38] of Single=((0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0), (0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0) ):
数组是可以通过索引来引用的同类型数据的列表.按照存储空间的获取方式,Delphi支持的数组类型有两种,即静态数组和动态数组.所谓静态数组就是在声明时就已经确定大小的数组类型,而动态数组是指其大小在声明时不能确定的数组,动态数组的大小在使用时确定. 声明静态数组的方式非常简单,只要指明数组长度和数据类型即可,下面就是声明了一个用来存放字符的数组: var Hello: array[0..5] of char; 容易看出,数组的声明明显包含3个部分,关键词array表明这是一个数组变量,而[x..y