Поиск файлов.

← →
Mishenka (2003-06-23 14:31) [0]

При поиске файлов с помощью FindFirst и FindNext с маской *.* первые два наденых файла с именами . и .. а потом всё нормально. Откуда они берутся и чё с ними делать?

← →
Palladin © (2003-06-23 14:33) [1]

берутся: из файловой системы
делать: игнорировать

See Also: организация файловой структуры диска DOS

← →
Mishenka (2003-06-23 15:00) [2]

Тобишь просто похерить первые два найденых файла?

← →
Palladin © (2003-06-23 15:10) [3]

херь

← →
andrey_pst © (2003-06-23 15:21) [4]

if (sr.Name <> "..") and (sr.Name <> ".")

← →
Chlavik © (2003-06-24 00:03) [5]

if Pos("..",Sr.Name)<>0 then.....

← →
Palladin © (2003-06-24 00:12) [6]

ну ты то куда лезешь, со своими незнаниями... я не понимаю...

← →
Chlavik © (2003-06-24 00:23) [7]

> Palladin © (24.06.03 00:12)
> ну ты то куда лезешь, со своими незнаниями... я не понимаю...

Это ты мне? Если мне то что не так?

← →
Palladin © (2003-06-24 00:31) [8]

ну что не так, подумай над своим условием, осознай его мысленно, проговори словами, что оно означает, какую смысловую нагрузку несет и поймешь что не так...

← →
Chlavik © (2003-06-24 01:03) [9]

Ну я имею ввиду if Pos("..",Sr.Name)<>0 then continue; :)

← →
sniknik © (2003-06-24 01:27) [10]

Chlavik © (24.06.03 01:03)
> Ну я имею ввиду if Pos("..",Sr.Name)<>0 then continue; :)

судя по всему этот вполне правомочный файл тоже проигнорируется
"C:\msdownld.tmp\AS4C6647..tmp\verisignpub1..crl...testr.zip"

может имел ввиду if Sr.Name[1])<>"." then begin ... end;? насколько помню с точки в виндах ни один путь не начинается. (но проще по моему faDirectory вычесть из атрибутов, если конечно не нужно вложенные папки искать а только файлы)

> Chlavik © (24.06.03 01:03)

ты парень не вкурил тему... зачем мне игнорировать строки которые содержат ".." мне нужно игнорировать строки которые равны ".."
почувсвуй разницу посмотри на имя файла которое привел sniknik

Mishenka (23.06.03 15:00)
Не стоит, похеришь не то.

IF FindFirst(маска,faAnyFile -faDirectory,...) then

Сорри if Pos(Sr.Name,"..")<>0 then continue; :) я просто перепутал. И что так разве не правильно??!!!!!! Помойму этот код компактен...

Поиск файлов. Найти похожие ветки