用API判断文件是否存在
function FileExistsAPI(const FileName:string):boolean;
var hf:hFile;
begin
hf:=CreateFile(PChar(FileName),GENERIC_READ,FILE_SHARE_READor FILE_SHARE_WRITE,nil,OPEN_EXISTING,0,0);
Result:=not(hf=INVALID_HANDLE_VALUE);
if Result then Result:=GetLastError=0 else CloseHandle(hf);
end;
本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请
点击举报。