04-23-2012، 04:41 PM
با سورس میتونید با وارد کردن درایو مورد نظر فضای خالیش رو بدست بیارید برای سورس زیر احتیاج هست از یونیت SysUtils استفاده کنید.
سورس کد :
سورس کد :
کد:
function DiskSpaceInfo(const Drive: string; out AvailBytes, TotalBytes,
FreeBytes: Int64): Boolean;
begin
// We use GetDiskFreeSpaceEx from SysUtils since it deals with OSs that do not
// support the Windows GetDiskFreeSpaceEx API call
Result := SysUtils.GetDiskFreeSpaceEx(
PChar(Drive), AvailBytes, TotalBytes, @FreeBytes
);
if not Result then
begin
AvailBytes := 0;
TotalBytes := 0;
FreeBytes := 0;
end;
end;