delphi 常用函数

StrUtils

这个包里面包含一些字符串相关的函数：

字符串相加

　　var

　　 　S1, S2: String;

　　begin

　　 　S1 := Concat('A', 'B'); // 连接两个字符串，S1变量等于AB。

　　 　S2 := Concat('Borland', ' Delphi', ' 7.0'); // 连接三个字符，S2变量等于Borland Delphi 7.0。

　　end;

去掉最后一个字符：

var
  s : string;
begin
  s := '123';

caption := copy(s, 1, Length(s)-1); //,去掉最后一个字符，此时caption的值是12
end;