如何判断一个指定文件是否存在和文件的大小(100)

  • 主题发起人 主题发起人 vpstar
  • 开始时间 开始时间
V

vpstar

Unregistered / Unconfirmed
GUEST, unregistred user!
如何判断一个指定文件是否存在和文件的大小,请各位指教
 
FileExists()------------Function File_Get_Size(Const afile: String): Int64; //取得指定文件大小Var FileInfo: TWin32FindData; FileHandle: THandle;Begin Result := -1; FileHandle := FindFirstFile(PChar(afile), FileInfo); If FileHandle <> INVALID_HANDLE_VALUE Then Begin Windows.FindClose(FileHandle); Int64Rec(Result).Lo := FileInfo.nFileSizeLow; Int64Rec(Result).Hi := FileInfo.nFileSizeHigh; End;End;
 
后退
顶部