本文整理自网络,侵删。
Delphi-Copy 函数函数名称 Copy
所在单元 System
函数原型
1 function Copy ( Source : string; StartChar, Count : Integer ) : string;2 function Copy ( Source : array; StartIndex, Count : Integer ) : array;函数功能 根据指定起始位置和数量,返回一个字符串的子串或者一个数组的子数组.
函数备注 第一个参数是一个字符串或一个动态数组,第二个参数是开始截取的索引序号,第三个参数是截取的元素的数量.
举例如下
var s : string;begin s := 'www.hhit.edu.cn'; s := Copy(s,5,4); // s = 'hhit' ShowMessage(s);end;
var intArray, intArray2: array of Integer; I: Integer;begin SetLength(intArray, 7); for I := Low(intArray) to High(intArray) do begin intArray[I] := I; end;
intArray2 := Copy(intArray, 3, 3); // intArray2 包含 3 ,4,5 三个元素
for I in intArray2 do begin ShowMessage(IntToStr(I)); end;end;
相关阅读 >>
Delphi 遍历所有目录和子目录下的文件名(可按后缀名遍历)
Delphi android实例-红外线操作(xe10.2+小米5)
更多相关阅读请进入《Delphi》频道 >>