|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
18.03.2010, 10:19 | #1 |
Форумчанин
Регистрация: 21.08.2009
Сообщений: 140
|
удаление совпадающих строк
Здравствуйте. Подскажите, как можно удалить совпадающую (или совпадающие) с какой либо строкой строку в txt файле? Смысл в том, чтоб в этом файле все строки были различны.
Структура самого файла такая: 122 877 126 и т.д., общее к-во строк неизвестно. Потом в проге у меня идет суммирование в переменную s: readln(f1,n); s=s+strtoint(n); Даже пусть совпадающие строки не удаляются из файла, а просто не входят в суммирование. Последний раз редактировалось varelik; 18.03.2010 в 10:56. |
18.03.2010, 10:27 | #2 |
Я есть!
Форумчанин
Регистрация: 17.02.2008
Сообщений: 318
|
перебором, иначе никак..
©Учиться, учиться и еще раз учиться!
|
18.03.2010, 10:36 | #3 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
сразу скажу, писал здесь, быстро и не проверяя!
отладку/исправление ошибок доверяю Вам! Код:
|
18.03.2010, 10:39 | #4 |
Форумчанин
Регистрация: 21.08.2009
Сообщений: 140
|
Serge_Bliznykov, спасибо, но не совсем то, я изначально вопрос неверно поставил, см поправку.
Последний раз редактировалось varelik; 18.03.2010 в 10:55. |
18.03.2010, 10:52 | #5 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
А я бы через ODBC подключил этот фал как базу данных, и уже простым запросом обработал его. Впрочем это Лирика.
I'm learning to live...
|
18.03.2010, 11:00 | #6 |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,528
|
Код:
программа — запись алгоритма на языке понятном транслятору
Последний раз редактировалось evg_m; 18.03.2010 в 11:16. |
18.03.2010, 11:04 | #7 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
а какая разница?!
можно (это будет эффективно), использовать тот же подход Код:
Последний раз редактировалось Serge_Bliznykov; 18.03.2010 в 11:07. |
18.03.2010, 16:06 | #8 |
Форумчанин
Регистрация: 21.08.2009
Сообщений: 140
|
спасибо, а как читать строки из stringlist?:
строки из txt считываю так: while not eof(f1) do readln(f1,n); есть ли аналогичная команда для строк stringlist типа readln(ts1,n)? дело в том, что на самом деле не строки должны суммироваться, а символы строк с 4 по 7 например. Вот так не выходит: Код:
Последний раз редактировалось varelik; 19.03.2010 в 11:47. |
20.03.2010, 21:57 | #9 |
Старожил
Регистрация: 20.04.2008
Сообщений: 5,528
|
f:= sum[4]+sum[5]+sum[6]+sum[7];
можно, но надо быть уверенным что длина каждой строки будет>=8 иначе будет ошибка f:=copy(sum,4,4); а можно и так в этом случае при короткой строке ( менее 8 знаков) скопированы будут толькр имееющиеся символы т.е. длина строки f будет <4 но ошибки не будет.
программа — запись алгоритма на языке понятном транслятору
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
удаление строк | alexk | Microsoft Office Excel | 24 | 15.02.2011 08:34 |
Поиск и удаление совпадающих строк в разных листах | hybrid84 | Microsoft Office Excel | 11 | 24.07.2009 05:13 |
Удаление строк из Memo | Leksda | Общие вопросы Delphi | 6 | 20.03.2009 15:31 |
Удаление строк | Dr.Badnezz | Общие вопросы Delphi | 1 | 07.10.2008 15:22 |
удаление строк | Dime_x | Microsoft Office Excel | 2 | 07.10.2008 13:38 |