Function StringOfChar(ch: Char; count: Integer): string; 说明:将ch复制count次返回。 StringOfChar('ab',3)='ababab';