| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Проверка в в FindFirst/FindNext. [D7, WinXP]
qwer-10 © (2005-07-07 12:25:00)Как правильно построить такое выражение, чтобы не писать дополнительный if
с проверкой "(SRec.Name <> '.') and (SRec.Name <>'..')"
var
SRec: TSerachRec;
if (SRec.Attr and faDirectory) = faDirectory) and (SRec.Name <> '.') and (SRec.Name <>'..') then
...
Anatoly Podgoretsky (2005-07-07 13:46:00) [1]palva © (07.07.05 12:38) [3]
В Виндоус тоже не запрещено.
Alexander Panov (2005-07-07 13:33:00) [2]Ты конечную цель своего вопроса скажи лучше.
palva (2005-07-07 12:38:00) [3]Хотя если имя начинается с точки... В юниксе это за ради бога.
palva (2005-07-07 12:36:00) [4]Дополнительный and можно не писать
if (SRec.Attr and faDirectory) = faDirectory) and (SRec.Name [1]<> '.')
Digitman (2005-07-07 12:29:00) [5]где тут "дополнительный if" ?
| |
