FindFirstFile

← →
Витя_1 (2008-09-06 18:05) [0]

Ищу файлы в определенной папки через FindFirstFile...FindNextFile, каким образом мне получать результате поиска только файлы, а не папки?
(Маска поиска: *.*)

← →
Anatoly Podgoretsky © (2008-09-06 18:07) [1]

Зачем тебе АПИ функция? Почему не Дельфи обертку?
У файлов и папок есть аттрибуты, а папок аттрибут faDirectory

← →
stas © (2008-09-06 18:09) [2]

var
FD : TWin32FindData;
....
(FILE_ATTRIBUTE_DIRECTORY and FD.dwFileAttributes) <> 0 - папка

← →
KilkennyCat © (2008-09-07 11:10) [3]

> stas © (06.09.08 18:09) [2]

Ну и зачем делать лишний and?

← →
icWasya © (2008-09-07 12:47) [4]

to KilkennyCat © (07.09.08 11:10) [3]
Ну и зачем делать лишний and?
А он совсем не лишний - у папок могут быть и другие атрибуты кроме FILE_ATTRIBUTE_DIRECTORY.

← →
Anatoly Podgoretsky © (2008-09-07 12:49) [5]

> KilkennyCat © (07.09.08 11:10) [3]

Читай студент.

http://www.podgoretsky.com/Redir.aspx?id=137&DownloadFile=~/ddp/bits.aspx

← →
Renegat © (2008-09-07 12:50) [6]

> [3] KilkennyCat © (07.09.08 11:10)

Предпочитаете TEST + JNZ?

← →
Renegat © (2008-09-07 12:56) [7]

> [5] Anatoly Podgoretsky © (07.09.08 12:49)

ЗЫ.
function InvertBit(Src: Integer; bit: Integer): Integer; begin Result := Src xor (1 shl Bit); end;

порадовало) Может, стоило просто воспользоваться ассемблерной вставкой с использованием всего одного опкода?
BTC EAX, EDX;

← →
Anatoly Podgoretsky © (2008-09-07 13:24) [8]

А я посмотрю, как ты будешь переходить на managed code или другую платформу.

> Anatoly Podgoretsky © (07.09.08 12:49) [5]

спасибо! теперь я знаю не только про and, но и про or! про остальное прочитать не успел - нельзя так много напрягаться...

> icWasya © (07.09.08 12:47) [4]

> А он совсем не лишний - у папок могут быть и другие атрибуты
> кроме FILE_ATTRIBUTE_DIRECTORY.

Перечитайте требование автора данной ветки и подумайте исчо раз.

FindFirstFile Найти похожие ветки