Скачать: CL | DM;

найти и удалить текст   Найти похожие ветки 

← →
Dot   (2006-01-06 18:36) [0]

Приветствую вас, Мастера!
меня интересует алоритм, желательно код как можно провернуть следующую операцию.
Есть текстовый файл со словами, словарь так сказать где каждое слово отделено от другово #13 то есть просто на другой строке.
---------- к примеру
мама
папа
дом
лес
работа
--------------------
Так вот в этом файле встречаются повторяющиеся слова, причем как подряд по нескольку штук так и по одиночке.
Как бы удалить все копии повторяющихся слов, оставив одно?
Помогите пожалуйста.

---

← →
Virgo_Style ©   (2006-01-06 18:53) [1]

можно ли менять порядок слов? Если да, то, видимо, можно использовать TStringList с Sorted = true и Duplicates = dupIgnore (сам не пробовал)

---

← →
Gero ©   (2006-01-06 18:56) [2]

Считывать по обному и если TStringList.IndexOf > -1 то добавлять в StringList.

---

← →
Virgo_Style ©   (2006-01-06 18:58) [3]

Gero ©   (06.01.06 18:56) [2]

позволю себе придраться по мелочи :-) Если > -1, то как раз таки не добавлять.

---

← →
Gero ©   (2006-01-06 18:59) [4]

> Virgo_Style ©   (06.01.06 18:58)

Да, именно так.

---

← →
Dot   (2006-01-06 19:08) [5]

А если без СтрингЛиста?

---

← →
Virgo_Style ©   (2006-01-06 19:44) [6]

Dot   (06.01.06 19:08) [5]

...то завести массив, в который писать новое слово в том случае, если его там еще нету. Все точно так же, но вместо StringList с его методами - массив с самописными функциями. При обычном поиске будет гораздо медленнее, если ввести сортировку и т.д. - получится твой собственный StringList :-)

---

← →
Johnmen ©   (2006-01-06 20:01) [7]

>каждое слово отделено от другово #13 то есть просто на другой строке.

Вообще-то на "другой строке" это #10

---

← →
Gero ©   (2006-01-06 23:50) [8]

> Dot   (06.01.06 19:08)
> А если без СтрингЛиста?

Тогда пиши хэш.

---

← →
ferr ©   (2006-01-07 00:01) [9]

а это уже совсем другая история... :)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.026 c