![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Проблемма подсчёта числа строк [D6, Win2k]
Lesnik © (2002-11-29 11:51:00)Как подсчитать количество строк (т.е. количество документов)в текстовом файле в среде Delphi.
Skier (2002-11-29 12:39:00) [1]>Lesnik
Загрузи файл в TStringList и дальше...TStringList.Count
LongIsland (2002-11-29 12:39:00) [2]Загружай в TStringList и ищи строку "Приход"
Андрей Сенченко (2002-11-29 12:37:00) [3]может это имелось введу ?
repeat
readln(TotSamyiFile,StringInFile);
i := i + 1
until eof (TotSamyiFile)
Lesnik (2002-11-29 12:37:00) [4]Файл содержит следующую, например информацию:
Приход - 20
Приход - 14
Приход - 52
Приход - 10
Приход - 7
Приход - 85
Подсчитать не сумму чисел,а кол-во слов "Приход"
В данном случае это будет 6
F1 (2002-11-29 12:16:00) [5]>Как подсчитать количество строк (т.е. количество документов)в >текстовом файле в среде Delphi.
Так все-таки что посчитать-то количество строк, документов, текстовых файлов, Delphi, или всего вместе???
В любом случае все придется считать через количество символов на диске, где установлен Delphi, в котором нужно посчитать количество документов, в которых нужно посчитать количество строк, которые и нужно посчитать. :)))
FreeLancer (2002-11-29 11:56:00) [6]Вопрос свой читал? Прежде чем отправить.
Александр С. (2002-11-29 11:54:00) [7]Поставить курсор на последнюю строку и посмотреть на StatusBar редактора.
Самое первое число слева и будет количестко строк.