标签:begin length .com util image lan and 等于 size
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;
标签:begin length .com util image lan and 等于 size
原文地址:http://www.cnblogs.com/feiyunaima/p/6268735.html