function StringOfChar(C: Char; I : LongInt): String;
Возвращает новую строку длиной I, заполненную символами C.