Подсчет символов в текстовом файле

← →
alex_pv2 © (2006-03-31 14:42) [0]

Всем доброго времени суток
возможно повторю чей нибудь вопрос.
Как можно лучше реализовать подсчет символов в текстовом файле, т.е.
такой-то символ встречается столько-то раз

← →
MBo © (2006-03-31 14:49) [1]

создать целочисленный массив, индексированный допустимыми символами, пробежать по символам всех строк, инкрементируя соотв. элемент массива.

например, для одной строки:

CharCounts: array[ #0..#255] of Integer; FillChar(CharCounts, SizeOf(CharCounts),0); for i:=1 to Length(s) Inc(CharCounts[s[i]]);

← →
alex_pv2 © (2006-03-31 15:14) [2]

мдя, со строкой получается преотлично
А вот до подсчета в файле расширить не хватает тяму

← →
Рамиль © (2006-03-31 15:19) [3]

А кто мешает весь текст в строку загрузить?

>А вот до подсчета в файле расширить не хватает тяму
Ну уж цикл по строкам сам напиши

убедили

Подсчет символов в текстовом файле Найти похожие ветки