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;
，
