可以, LPWIN32_FIND_DATA lpFindFileData
在delphi中是一个 Twin32finDdata的数据类型
包含文件的各种信息。
可以这样用
var
filedata: Twin32finDdata;
fhandle:Thandle;
begin
fhandle := findfirstfile(pchar('c:\1.tmp'), filedata);
if not (fhandle = INVALID_HANDLE_VALUE) then
begin
...
filedata.cFileName
.....
end;