关于Delphi中的静态数组、动态数组、检测数组上下界、copy数组

2023-01-19 773

版权

本文内容由阿里云实名注册用户自发贡献，版权归原作者所有，阿里云开发者社区不拥有其著作权，亦不承担相应法律责任。具体规则请查看《阿里云开发者社区用户服务协议》和《阿里云开发者社区知识产权保护指引》。如果您发现本社区中有涉嫌抄袭的内容，填写侵权投诉表单进行举报，一经查实，本社区将立刻删除涉嫌侵权内容。

简介： 关于Delphi中的静态数组、动态数组、检测数组上下界、copy数组

静态数组的定义方法

声明数组需要通过保留字 array 和 of 进行声明：

//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;  //压缩数组定义, 好像没有区别

动态数组的使用

动态数组的定义：

在后面定义的时候再写确定的大小。

//例1:
var
  StrArr: array of String;  //动态数组定义时不写维数
begin
  SetLength(StrArr,6);      //分配6个元素位置大小: 0-5
  StrArr[0] := '十七画生';   //动态数组的下界是 0
  ShowMessage(StrArr[0]);   //分配空间后和静态数组一样使用
  StrArr := nil;            //一般没必要手动释放, 动态数组离开作用域会自释放
end;

动态数组的引用：

这里是同一个数组，只不过可以由两个指针指向引用。

var
  Arr1,Arr2: array of Integer;
  a: array[0..1] of Integer;
begin
  SetLength(Arr1,6);
  Arr1[5] := 100;
  Arr2 := Arr1;                          //Arr2 引用了 Arr1
  ShowMessage(IntToStr(Arr2[5]));        //100
  ShowMessage(IntToStr(Length(Arr2)));   //当然 Arr2 维数也会是 6
  ShowMessage(IntToStr(SizeOf(Arr1)));   //4, 其实动态数组是个指针
  ShowMessage(IntToStr(SizeOf(Arr2)));   //4
  Arr2[5] := 99;                   //现在它们指向同一个数组, 改变这个就是改变那个
  ShowMessage(IntToStr(Arr1[5]));  //99
  Arr1 := nil;                     //释放其中一个指针, 数组继续存在（空间还在，指针可以多对一）
  ShowMessage(IntToStr(Arr2[5]));  //99
end;

动态多维数组：

只是简单的添加了一个array。

var
  Arr: array of array of Integer;  //定义多维数组
begin
  SetLength(Arr,5,5);  //分配空间
  Arr[0,3] := 100;     //赋值
  ShowMessage(IntToStr(Arr[0,3]));  //取值
end;

数组copy

全部复制：

这里与Delphi的数组引用有区别，区别实际上在于这里另外开辟了一块空间，里面内容一模一样。

var
  Arr1,Arr2: array of Integer;
begin
  SetLength(Arr1,6);
  Arr1[5] := 100;
  Arr2 := Copy(Arr1);                      //数组 Copy
  Arr2[5] := 99;                           //改变 Arr2 不再影响 Arr1
  ShowMessage(IntToStr(Arr1[5]-Arr2[5]));  //1
  SetLength(Arr1,7);
  ShowMessage(IntToStr(Length(Arr1)));      //7
  ShowMessage(IntToStr(Length(Arr2)));      //6, 没有一点牵扯了
end;

切片范围复制：

这里可以控制复制的范围，可以分块复制，但是不能间隔几个元素复制。

代码如下：

var
  Arr1,Arr2: array of Integer;
  i: Integer;
begin
  SetLength(Arr1,6);
  for i := Low(Arr1) to High(Arr1) do  //给每个元素赋值
    Arr1[i] := i+1;
  Arr2 := Copy(Arr1,1,3);  //只 Copy 第2..4个元素
  ShowMessage(IntToStr(Arr1[1]));  //2, 现在 Arr2[0] 和 Arr1[1] 的值是一样的
  ShowMessage(IntToStr(Arr2[0]));  //2
  ShowMessage(IntToStr(Length(Arr1)));  //6, 维数肯定不一样了
  ShowMessage(IntToStr(Length(Arr2)));  //3
end;

运行结果展示：

检测数组的上、下界

当系统函数low，high的参数是数组变量时，两函数分别返回数组下标的下界和上界。

代码如下：

var
    Myarray: array of integer;
    i : Integer;
begin
    SetLength(MyArray,10);
    for i:=Low(MyArray[i]) to High(MyArray[i]) do
    ……
end;

关于Delphi中的静态数组、动态数组、检测数组上下界、copy数组

静态数组的定义方法

声明数组需要通过保留字 array 和 of 进行声明：

使用类型定义：

定义记录类型数组：

动态数组的使用

动态数组的定义：

动态数组的引用：

动态多维数组：

数组copy

全部复制：

切片范围复制：

检测数组的上、下界

热门文章

最新文章

相关电子书

探索云世界

热门

云计算

大数据

云原生

人工智能

数据库

开发与运维

活动广场

任务中心

训练营

直播

乘风者计划

下载

镜像站

技术资料

关于Delphi中的静态数组、动态数组、检测数组上下界、copy数组

静态数组的定义方法

声明数组需要通过保留字 array 和 of 进行声明：

使用类型定义：

定义记录类型数组：

动态数组的使用

动态数组的定义：

动态数组的引用：

动态多维数组：

数组copy

全部复制：

切片范围复制：

检测数组的上、下界

热门文章

最新文章

相关电子书