| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Поиск в поиске [D7]
Garacio © (2007-01-13 15:01:00)У меня в папке находятся файлы с названиями: 2home_12.03.2006, home_16.08.2005 и т.п. Я произвожу поиск по названию:
Finded := FindFirst(SourcePath + '*home*.txt', faAnyFile, SR);
Как из полученного таким образом SR.Name достать дату, и если 2006 - то в третью графу ListView поместить слово "Новый", если 2005 и ранее - то "Старый"?
Garacio (2007-01-13 17:21:00) [1]
Finded := FindFirst(SourcePath + '*home*.txt', faAnyFile, SR);
if Copy(SR.Name, Length(Finded) - 8, 4) = 2006
then ListView.Items[i].SubItems[1]:= 'Новый';
Верно?
Savek (2007-01-13 17:12:00) [2]DateStr:=Copy(SR.Name,Length(Finded)-14,10);
YearStr:=Copy(SR.Name,Length(Finded)-8,4);
при условии что дата занимает 10 символов + .txt еще 4 символа
| |
