| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
найти и удалить текст [D7, XP]
Dot © (2006-01-06 18:36:00)Приветствую вас, Мастера!
меня интересует алоритм, желательно код как можно провернуть следующую операцию.
Есть текстовый файл со словами, словарь так сказать где каждое слово отделено от другово #13 то есть просто на другой строке.
---------- к примеру
мама
папа
дом
лес
работа
--------------------
Так вот в этом файле встречаются повторяющиеся слова, причем как подряд по нескольку штук так и по одиночке.
Как бы удалить все копии повторяющихся слов, оставив одно?
Помогите пожалуйста.
ferr (2006-01-07 00:01:00) [1]а это уже совсем другая история... :)
Gero (2006-01-06 23:50:00) [2]> Dot (06.01.06 19:08)
> А если без СтрингЛиста?
Тогда пиши хэш.
Johnmen (2006-01-06 20:01:00) [3]>каждое слово отделено от другово #13 то есть просто на другой строке.
Вообще-то на "другой строке" это #10
Virgo_Style (2006-01-06 19:44:00) [4]Dot (06.01.06 19:08) [5]
...то завести массив, в который писать новое слово в том случае, если его там еще нету. Все точно так же, но вместо StringList с его методами - массив с самописными функциями. При обычном поиске будет гораздо медленнее, если ввести сортировку и т.д. - получится твой собственный StringList :-)
Dot (2006-01-06 19:08:00) [5]А если без СтрингЛиста?
Gero (2006-01-06 18:59:00) [6]> Virgo_Style © (06.01.06 18:58)
Да, именно так.
Virgo_Style (2006-01-06 18:58:00) [7]Gero © (06.01.06 18:56) [2]
позволю себе придраться по мелочи :-) Если > -1, то как раз таки недобавлять.
Gero (2006-01-06 18:56:00) [8]Считывать по обному и если TStringList.IndexOf > -1 то добавлять в StringList.
Virgo_Style (2006-01-06 18:53:00) [9]можно ли менять порядок слов? Если да, то, видимо, можно использовать TStringList с Sorted = true и Duplicates = dupIgnore (сам не пробовал)
| |
