Functions.DiskFree 方法 (Int32)

返回指定磁盘上的可用空间。

命名空间： XSharp.Core
程序集： XSharp.Core (在 XSharp.Core.dll 中) 版本：2.22 GA

语法

 FUNCTION DiskFree(
	nDrive AS LONG
) AS INT64

public static long DiskFree(
	int nDrive
)

查看代码

参数

nDrive: 类型：Int32
The number of the disk drive to query, where 1 is drive A, 2 is B, 3 is C, and so on.

返回值

类型：Int64
指定磁盘驱动器上的空闲空间字节数。

备注

DiskFree() 确定指定磁盘驱动器上剩余的可用字节数。
在复制或排序到另一个驱动器时，它可用于在开始操作之前确定是否有足够的可用空间。

示例

这个例子是一个函数，演示了如何使用 DiskFree() 将数据库文件备份到另一个驱动器：

复制

 1FUNCTION BackUp(cTargetFile, cTargetDrive)
 2    LOCAL nSpaceNeeded
 3    LOCAL lSuccess := FALSE
 4    // 计算打开文件的大小
 5    nSpaceNeeded := Integer((RecSize() * ;
 6                    LastRec()) + Header() + 1)
 7    IF DiskFree(cTargetDrive) < nSpaceNeeded
 8        lSuccess := FALSE
 9    ELSE
10        // 在复制之前关闭数据库文件
11       DBCloseArea()
12        FCopy("sales.dbf", cTargetDrive + ":"+ cTargetFile)
13        lSuccess := TRUE
14    ENDIF
15    RETURN lSuccess

参见

引用