| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как проверить существование пункта в listbox? [D7, XP]
lobach © (2006-11-20 20:10:00)Вобщем в результате поиска в TSearchRec.name есть 10 текстовых файлов:
02.2005.txt
04.2005.txt
11.2005.txt
01.2006.txt
02.2006.txt
04.2006.txt
05.2006.txt
07.2006.txt
09.2006.txt
12.2006.txt
имена которых обозначат месяц и год.
В listbox нужно перечислить все года, которые есть в именах файлов(т.е. 2005 и 2006). Как год получаю так: Copy(TSearchRec.name, 4, 7)
как проверить есть ли уже такой элемент, т.е. если такой год есть, продолжить, если нет добавить.
KilkennyCat (2006-11-21 00:29:00) [1]> [3] Anatoly Podgoretsky © (20.11.06 23:06)
Чтобы не забыть, что файл - текстовый.
Anatoly Podgoretsky (2006-11-20 23:06:00) [2]> lobach (20.11.2006 20:10:00) [0]
Только зачем тебе 7 символов, если год состоит из четырех?
Alexander Panov (2006-11-20 21:30:00) [3]
> lobach © (20.11.06 20:10)
Пройти по TListBox в цикле и сравнить каждую строку.
Второй вариант - формировать во время поиска сразу год в поле ListBox1.Items.Objects[n] и при поиске сравнивать уже только по этому полю.
RASkov (2006-11-20 20:29:00) [4]если в ListBox'е уже только года то
ListBox.Items.IndexOf('2006')
если вернет меньше ноля то нет
| |
