下列函数如未说明,执行失败都返回 负数。
定义 | 说明 | 库 |
---|---|---|
FileOpen(path,mode) | 打开文件返回句柄,失败返回负数。mode 可为:
fmOpenRead / fmOpenWrite / fmOpenReadWrite |
|
FileCreate(path) FileCreate(path, Rights) |
建立文件,返回句柄,失败返回负数 | |
FileRead(handle, buf, buflen) | 从文件读入缓冲区,返回读入字节数 | |
FileWrite(handle, buf, buflen) | 缓冲区内容写入文件,返回写入字节数 | |
FileSeek(handle,Offset,Origin) | 文件指针定位。Origin 可为:
0 文件首 / 1 当前位置 / 2 文件结尾 |
|
FileClose(handle) | 关闭文件 | |
FileAge(path) | 返回文件创建时间,失败返回 -1 | |
FileExists(path) | 返回文件是否存在 | |
FindFirst(path,Attr,TSearchRec) | 开始搜索文件,成功返回 0 | |
FindNext(TSearchRec) | 继续搜索文件,成功返回 0 | |
FindClose(TSearchRec) | 结束搜索文件操作 | |
FileGetDate(handle) | 返回文件修改时间 | |
FileSetDate(handle, integer) | 设置文件修改时间 | |
FileGetAttr(path) | 返回文件属性 | |
FileSetAttr(path,attr) | 设置文件属性 | |
FileIsReadOnly(path) | 返回文件是否只读 | |
FileSetReadOnly(path,readonly) | 设置文件只读属性,返回是否成功 | |
DeleteFile(path) | 删除,返回是否成功 |
定义 | 说明 | 库 |
---|---|---|
RenameFile(oldpath,newpath) | 文件重命名,返回是否成功 | |
ChangeFileExt(string,'.ext') | 返回修改扩展名后的文件名字符串 | |
ExtractFilePath(string) | 返回表示路径的字符串,'D:\D\' | |
ExtractFileDir(string) | 返回表示目录的字符串,'D:\D' | |
ExtractFileDrive(string) | 返回表示驱动器的字符串,'D:' | |
ExtractFileName(string) | 返回表示文件名的字符串,'a.b' | |
ExtractFileExt(string) | 返回表示扩展名的字符串,'.exe' | |
ExpandFileName(string) | 返回全路径表示方式的字符串 | |
ExpandFileNameCase(string) | 返回文件名的完整表示 | |
ExpandUNCFileName(string) | 返回 Linux 文件名表示,斜杠反向 | |
ExtractRelativePath(base,targer) | 返回相对路径表示 | |
ExtractShortPathName(string) | 返回 8.3 格式表示 | |
FileSearch(file,'dir1;dir2') | 返回搜索到的完整路径表示 | |
AnsiCompareFileName(const S1, S2: string): Integer | 比较两个文件名 | |
SameFileName(const S1, S2: string): Boolean | 返回两个文件名是否相等 | |
AnsiLowerCaseFileName(const S: string): string | 返回小写文件名 | |
AnsiUpperCaseFileName(const S: string): string | 返回大写文件名 |
定义 | 说明 | 库 |
---|---|---|
DirectoryExists(path) | 返回目录是否存在 | |
ForceDirectories(path) | 创建子目录并返回是否成功 | |
DiskFree(byte):Int64 | 返回磁盘可用空间。byte 可为:
0 当前 / 1 A / 2 B |
|
DiskSize(byte):Int64 | 返回磁盘容量 | |
GetCurrentDir():string | 返回当前目录路径 | |
SetCurrentDir(path) | 设置当前目录,返回是否成功 | |
CreateDir(path) | 创建目录,返回是否成功 | |
RemoveDir(path) | 删除目录,返回是否成功 |
FindFirst(Path, Attr, TSearchRec) |
FindNext(TSearchRec) |