字符相关操作语法总结

System.FillChar - 填充字节

举例:

var
  s: array[0..9] of Char;
begin
  FillChar(s,SizeOf(s),‘a‘);
  ShowMessage(s); {aaaaaaaaaa}
end;

System.StringOfChar - 反复字符

举例:

var
  s: string;
begin
  s := StringOfChar(‘G‘, 5);
  ShowMessage(s);  {GGGGG}
end;

StrUtils.DupeString - 反复字符串

举例:

var
  s: string;
begin
  s := ‘Delphi‘;
  s := DupeString(s,3);
  ShowMessage(s);  //DelphiDelphiDelphi
end;

System.Copy - 从字符串或数组中复制

function Copy(
  S: String;      {字符串或动态数组}
  Index: Integer; {起始位置}
  Count: Integer  {Copy 个数}
): String;        {如果参数 S 是动态数组, 这里也应该返回动态数组}

//从字符串中提取
var
  ss,s: string;
begin
  ss := ‘CodeGear Delphi 2007‘;
  s := Copy(ss,5,4);
  ShowMessage(s);   {Gear}
end;

System.Delete - 从字符串中删除

procedure Delete(
  var S: String;  {源字符串; 因为是 var 参数, 不可能是个常量}
  Index: Integer; {起始位置; 第一个字符的位置是 1, 起始位置不能小于 1 }
  Count: Integer  {要删除的字数}
);

var
  s: string;
begin
  s := ‘Delphi 2007‘;
  Delete(s, 2, 4);
  ShowMessage(s); {Di 2007}
end;

System.Concat - 连接字符串

举例:

var
  s: string;
begin
  s := Concat(‘CodeGear‘, #32 ,‘Delphi‘, #32 ,‘2007‘);
  ShowMessage(s); {CodeGear Delphi 2007}
end;