Ну не символа, а строки.
Получить на дискретных - запросто Count-> Math + ArrayRW = Результат - довольно солидная добавка к коду, т.е. так называемый "индусский код".
Вот, с лёгкой руки NordWest-а, начнут применять FormatStr вместо Memory, DoData. А почему бы и нет ?
------------ Дoбавленo в 19.11:
foksov, а чем отсеял бы ?
У меня, например, есть CharParse - цифры налево, символы направо.