Cette fonction répète un caractère détermine plusieurs fois sous forme de chaîne de caractères de format standard Pascal.
Function StringOfChar(Ch: Char; Count: Integer): string;