|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
23.01.2008, 22:06 | #1 |
Форумчанин Подтвердите свой е-майл
Регистрация: 21.01.2007
Сообщений: 193
|
Работа с текстовым файлом
подскажите пожалуйста, оч. срочно нужно
задача такая: необходимо подсчитать в текстовом файле кол-во слов написал кусочек проги: Код:
|
23.01.2008, 22:18 | #2 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Если после слова нет разделителя, то как вы определяете, что это два слова?
|
23.01.2008, 22:23 | #4 |
Участник клуба
Регистрация: 02.09.2007
Сообщений: 1,193
|
Добавьте символ конца строки
if v in [' ',':', ';', ',', '.', #13] then |
23.01.2008, 22:35 | #6 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Eoln - конец строки, это комбинация символов ASCII #13 (CR) и #10 (LF);
|
23.01.2008, 22:38 | #7 |
Участник клуба
Регистрация: 02.09.2007
Сообщений: 1,193
|
А последняя строка у вас завершена Eoln? Enter после ввода давили? Если нет, то там нет завершающего строку символа. Тогда после цикла к k_word сами добавляйте единичку.
|
23.01.2008, 22:48 | #8 | |
Форумчанин Подтвердите свой е-майл
Регистрация: 21.01.2007
Сообщений: 193
|
Цитата:
код изменил: if v in [' ',':', ';', ',', '.', #10, #13] then |
|
23.01.2008, 22:54 | #9 |
Участник клуба
Регистрация: 02.09.2007
Сообщений: 1,193
|
А зачем и #13, и #10 (они же стоят друг за другом) - или то или другое...
|
23.01.2008, 23:00 | #10 |
Старожил
Регистрация: 13.10.2007
Сообщений: 2,740
|
Во первых не #10, #13, а #13,#10,важна последовательнось. Кроме того комбинация символов (по крайней мере в Делфи) это #13+#10. Попробуйте, если не получится, придется считывать текст построчно и считать слова в строчках, сейчас найду этот код.
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Работа с текстовым файлом | GazimagomedovM | Помощь студентам | 12 | 17.07.2008 18:24 |
Работа с текстовым файлом (delphi). Помогите доделать программу. | Snord | Помощь студентам | 1 | 14.12.2007 14:10 |
Работа с текстовым файлом | nataly_ukr | БД в Delphi | 23 | 07.12.2007 22:13 |
Работа с текстовым файлом! | Edimus | Общие вопросы C/C++ | 10 | 19.11.2007 10:31 |
Модуль, работа с текстовым файлом | Soul | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 21.05.2007 20:30 |