delphi Copy 字符串函数

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;

推荐分享