代码改变世界

delphi 常用函数

2017-01-10 11:31  绿贝  阅读(215)  评论(0编辑  收藏  举报

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;
复制代码