delphi 反复和反转字符串

StrUtils.DupeString - 反复字符串

举例:

---

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

StrUtils.ReverseString - 翻转字符串

举例:

---

var
  ss,s: string;
begin
  ss := 'Delphi';
  s := ReverseString(ss);
  ShowMessage(s);  {ihpleD}
end;