Ôóíêöèÿ FindClose
Çàâåðøàåò ïîèñê, íà÷àòûé ôóíêöèåé FindFirstFile è ïðîäîëæåííûé FindNextFile.
BOOL FindClose(
HANDLE hFindFile // Äåñêðèïòîð ïîèñêà
);
Ïðèìåð. Âûâåñòè òåêóùèé êàòàëîã.
Ideal
p586
model flat
extrn ExitProcess:proc
extrn FindFirstFileA:proc
extrn FindNextFileA :proc
extrn FindClose :proc
extrn MessageBoxA:proc
extrn puts:proc
include win.inc
dataseg
FileName db '*.*', 0
FindFileData WIN32_FIND_DATA<>
d1 dd ?
msg db 'Error!!!', 0
tit db '',0
eol db 13,10,0
codeseg
begin:
lea eax, [ FindFileData]
push eax
push offset FileName
call FindFirstFileA
cmp eax, INVALID_HANDLE_VALUE
je short error
mov [d1], eax
lea ebx, [FindFileData.cFileName]
push ebx
call puts
push offset eol
call puts
for1:
lea ebx, [FindFileData]
push ebx
push [d1]
call FindNextFileA
test eax, eax
je short break;
lea ebx, [FindFileData.cFileName]
push ebx
call puts
push offset eol
call puts
jmp for1
break:
push [d1]
call FindClose
jmp short ok
error:
ok:
call ExitProcess
end begin
Ôàéë âñòàâêè (win.inc)
MB_OK equ 0
STD_INPUT_HANDLE equ -10
STD_OUTPUT_HANDLE equ 11
STD_ERROR_HANDLE equ -12
CREATE_NEW equ 1
CREATE_ALWAYS equ 2
OPEN_EXISTING equ 3
OPEN_ALWAYS equ 4
TRUNCATE_EXISTING equ 5
GENERIC_READ equ 80000000h
GENERIC_WRITE equ 40000000h
GENERIC_EXECUTE equ 20000000h
GENERIC_ALL equ 10000000h
INVALID_HANDLE_VALUE equ (-1)
ideal
macro ShowMessage str1, tit, button
push button
push tit
push str1
push 0
call MessageBoxA
endm
macro skip address
localààà l1, l2
ifidn <di>, <address>
regàààààà equààààà esi
else
regàààààà equààààà edi
endif
pushàààà reg
movàààà reg, address
l2:
cmpàààà [byte ptr reg], ' '
jneàààààà l1
incàààààà reg
jmpààààà l2
l1:
movàààà address, reg
popààààà reg
endm
MAX_PATHààà equààààà 260
masm
WIN32_FIND_DATA struc
dwFileAttributes ddàààà ?
ftCreationTimeààààààààààà ddààààààà ?,?
ftLastAccessTime ddààà ?,?
ftLastWriteTimeà ddàààà ?,?
nFileSizeHighà ddààààààà ?
nFileSizeLowàà ddààààààà ?
dwResààààààààààààà ddààààààà 0,0
cFileName dbà (MAX_PATH) dup (?)
cAlternateFileName db 14 dup (?)
ends
+ñ¨ðªøªõ òýøüðýøõ, ¢ªþ ôû ¨ðñþªv ¸þ ¸ª¨ºúªº¨þù ÿõ¨õúû¦¢õý ¨õöøü ª¨ðý¸û ¡øø.
