StringOfChar

Return a string consisting of 1 character repeated N times.

Declaration

Source position: systemh.inc line 1316

  function StringOfChar(c: AnsiChar; l: SizeInt) : AnsiString;

Description

StringOfChar creates a new String of length l and fills it with the character c.

It is equivalent to the following calls:

SetLength(StringOfChar,l);
FillChar(Pointer(StringOfChar)^,Length(StringOfChar),c);

Errors

None.

See also

Name Description
SetLength Set length of a string or dynamic array.

Example

Program Example97;
{$H+}
{ Program to demonstrate the StringOfChar function. }
Var S : String;
begin
  S:=StringOfChar(' ',40)+'Aligned at column 41.';
  Writeln(s);
end.