Delphi：字符操作函数－－生成指定个数的字符（串）

关键字：填充,N个,指定数量,指定个数,字符,字符串

生成指定个数的字符，发现有人自己写函数完成，实际上Delphi有此功能的函数

生成指定个数字符的字符串
StringOfChar('S', 10);
得到 'SSSSSSSSSS'

返回字符串AText的ACount个复本
uses StrUtils
首部 function DupeString(const AText: string; ACount: Integer): string;
功能 返回字符串AText的ACount个复本
说明 当ACount为0时返回''
参考 function System.SetLength
例子 Edit3.Text := DupeString(Edit1.Text, 10);

FillChar
var
  S: array[0..79] of char;
begin
  { Set to all spaces }
  FillChar(S, SizeOf(S), Ord(' '));
end;