type TOneArray = array of Integer;procedure AddArrayItem(Arr: TOneArray; x: Integer);begin SetLength(Arr,Length(Arr)+1); Arr[High(Arr)] := x;end;
本文共 194 字，大约阅读时间需要 1 分钟。
type TOneArray = array of Integer;procedure AddArrayItem(Arr: TOneArray; x: Integer);begin SetLength(Arr,Length(Arr)+1); Arr[High(Arr)] := x;end;
转载于:https://my.oschina.net/hermer/blog/319595