delphi 给动态数组添加一个元素

本文整理自网络，侵删。

 给动态数组添加一个元素
type
TOneArray = array of Integer;

procedure AddArrayItem(Arr: TOneArray; x: Integer);
begin
SetLength(Arr,Length(Arr)+1);
Arr[High(Arr)] := x;
end; 

相关阅读 >>

Delphi 判断文件名是否合法，判断文件名路径是否合法

Delphi 从 exe 或 dll 中获取图标的函数

Delphi编写提取exe文件的ico图标

Delphi 获取android包名称

Delphi tclientdataset用法详解

Delphi让文本框接受文件拖放

Delphi获取开机时间代码

processid, process handle, window handle 之间的互相转换

Delphi写的验证身份证号有效性函数

Delphi 分解链接主域名和文件名

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi 给动态数组添加一个元素