| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Удалить дубликаты в ListBox [D7, XP]

SerJaNT ©   (2007-04-12 02:04:00) 

Как в ListBox удалить дубликаты?

---

Юрий Зотов   (2007-04-12 10:10:00) [1]

Тем не менее, 2 цикла: один - явный, а второй - в IndexOf.
:о)

---

{RASkov}   (2007-04-12 05:45:00) [2]

Было дело... мусолили эту тему и еще одну похожую :)

---

Германн   (2007-04-12 04:00:00) [3]

:-)

---

{RASkov}   (2007-04-12 03:42:00) [4]

> Если мешает

with ListBox do
for i:=Count-1 downto 1 do
 if Items.IndexOf(Items.String[i]) <> i then Items.Delete(i);
Германн © (18.02.07 01:14)

---

Юрий Зотов   (2007-04-12 02:34:00) [5]

Если сортировка не мешает, то скопировать в TStringList, потом обратно  (см. Sorted, Duplicates).

Если мешает, то ручками. Наружный цикл идет по строкам, внутренний ищет и удаляет дубликаты.

---

Наверх