文件、磁盘操作函数

软件大多都要对文件、磁盘进行操作。熟悉掌握这些函数可以帮助你轻松实现创建、删除、保存文件等功能。

  1.Append
  功能说明:追加内容到文件中。文件必须要存在。

  参考实例:

  var

    S: String;

    F: TextFile;

  begin

    S := ‘This is a book.‘;

  AssignFile(F, ‘C:\MyFile.txt‘); // 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。

    Append(F); // 以追加的方式打开文件

    Writeln(F, S); // 将S变量中的内容追加到文本尾后。

    CloseFile(F); // 关闭文件

  end;

  2.AssignFile
  功能说明:与指定的文件建立连接。

  参考实例:

  var

    F: TextFile; // 声明文本文件类型变量

  begin

    AssignFile(F, ‘C:\MyFile.txt‘); // 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。

  end;

  3.ChDir
  功能说明:改变当前目录(文件夹)。

  参考实例:

  var

    sDir: String;

  begin

    sDir := ‘C:\Windows‘;

    ChDir(sDir); // 此时,系统的当前目录则为C:\Windows目录。

  end;

  4.CloseFile
  功能说明:关闭文件。当对文件的操作完成后,应该使用CloseFile函数关闭打开的文件。

  参考实例:

  var

    S: String;

    AllText: String;

    F: TextFile;

  begin

  AssignFile(F, ‘C:\MyFile.txt‘); // 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。

    Reset(F); // 打开文件

    while not EOF(F) do begin // 使用While循环,一直判断是否到了文件未尾

     Readln(F, S); // 读取一行文本

     AllText := AllText + S;

    end;

    CloseFile(F); // 关闭文件

  end;

  5.DeleteFile
  功能说明:删除指定的文件。该函数只有一个参数。此参数为欲删除文件的完整路径。如果删除成功,则返回True。若删除失败、或文件不存在则返回False。

  参考实例:

  var

    IsOK: Boolean; // 用于保存删除状态

  begin

    IsOK := DeleteFile(‘C:\My Documents\Index.html‘); // 函数执着后,将结果返回给IsOK变量。如果IsOK变量为True,则表示文件删除成功。

    if IsOK then ShowMessage(‘文件删除成功!‘)

    else ShowMessage(‘文件删除失败!‘);

  end;

  6.DirectoryExists
  功能说明:检测指定的文件夹否存在。如果存在则返回True,反之则为False。

  参考实例:

  var

    IsExists: Boolean;

  begin

    IsExists := DirectoryExists (‘C:\Windows‘);

    if IsExists then ShowMessage(‘Windows文件夹存在!‘)

    else ShowMessage(‘Windows文件夹不存在!‘);

  end;

  7.DiskFree
  功能说明:获取指定磁盘的剩余空间。该函数只有一个参数。该参数用于指定要获取剩余空间的磁盘号。当参数为0时,表示获取当前磁盘的剩余空间,1为A盘,2为B盘,以此类推。如果返回值为-1,表示指定的磁盘无效。

  参考实例:

  var

    FreeSize: Int64;

  begin

    FreeSize := DiskFree(3); // 获取C盘中的剩余空间。返回的值是以“字节”为单位的。

  end;

  8.DiskSize
  功能说明:获取指定磁盘的空间。该函数只有一个参数。该参数用于指定要获取磁盘空间的磁盘号。当参数为0时,表示获取当前磁盘的空间,1为A盘,2为B盘,以此类推。如果返回值为-1,表示指定的磁盘无效。

  参考实例:

  var

    DiskSize: Int64;

  begin

    DiskSize:= DiskSize(3); // 获取C盘的空间。返回的值是以“字节”为单位的。

  end;

  9.EOF
  功能说明:判断文件指针是否移动到了文件未尾。当EOF函数返回值为True时,则不可以使用Readln函数进行读取文件了。

  参考实例:

  var

    S: String;

    AllText: String;

    F: TextFile;

  begin

  AssignFile(F, ‘C:\MyFile.txt‘); // 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。

    Reset(F); // 打开文件

    while not EOF(F) do begin // 使用While循环,一直判断是否到了文件未尾

     Readln(F, S); // 读取一行文本

     AllText := AllText + S;

    end;

  end;

  10.Erase
  功能说明:删除文件。

  参考实例:

  var

    F: File;

  begin

  AssignFile(F, ‘C:\MyFile.txt‘); // 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。

    Reset(F); // 打开文件

    CloseFile(F); // 关闭文件

    Erase(F); // 删除文件。在删除文件之前必须先关闭文件。

  end;

  11.FileExists
  功能说明:检测指定的文件否存在。如果存在则返回True,反之则为False。

  参考实例:

  var

    IsExists: Boolean;

  begin

    IsExists := FileExists(‘C:\Test.txt‘);

    if IsExists then ShowMessage(‘该文件存在!‘)

    else ShowMessage(‘该文件不存在!‘);

  end;

  12.FileSize
  功能说明:获取文件大小。返回的结果是字节为单位。

  参考实例:

  var

    F: file of Byte;

    nSize: Longint;

  begin

  AssignFile(F, ‘C:\MyFile.txt‘); // 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。

    Reset(F); // 打开文件

    nSize := FileSize(F); // 获取文件大小。

    CloseFile(F); // 关闭文件

  end;

  13.ForceDirectories
  功能说明:创建新的子目录。路径中不存在的目录将一同创建。

  参考实例:

  ForceDirectories(‘C:\Flash\MyFolder‘); // 如果Flash文件夹本身不存的话,那么将会先创建Flash文件夹,然后再创建MyFolder文件夹。

  14.MkDir
  功能说明:创建一个新的子目录(文件夹)。

  参考实例:

  MkDir(‘C:\MyFolder‘); // 在C盘根目录中创建了一个名叫MyFolder的文件夹。

  需要注意的是,如果在本身不存在的目录中创建子目录将会失败。比如C盘根本不存在Flash文件夹,写成MkDir(‘C:\Flash\MyFolder‘);这样将不能成功创建MyFolder文件夹。

  15.Reset
  功能说明:以只读方式打开文件。

  参考实例:

  var

    F: TextFile; // 声明文本文件类型变量

  begin

    AssignFile(F, ‘C:\MyFile.txt‘); // 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。

    Reset(F); // 打开文件

  end;

  16.Rewrite
  功能说明:以可写方式打开文件。如果文件不存在,将会自动创建。使用该函数,将会覆盖文件中的所有内容。

  参考实例:

  var

    F: TextFile; // 声明文本文件类型变量

  begin

    AssignFile(F, ‘C:\MyFile.txt‘); // 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。

    Rewrite(F); // 打开文件。如果文件不存在,将会在C盘中创建MyFile.txt文件。如果文件存在,将会覆盖MyFile.txt中的所有内容。

  end;

  17.Readln
  功能说明:读取一行文本。

  参考实例:

  var

    S: String;

    F: TextFile;

  begin

  AssignFile(F, ‘C:\MyFile.txt‘); // 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。

    Reset(F); // 打开文件

    Readln(F, S); // 读取一行文本到S变量中

  end;

  18.Rename
  功能说明:更改文件名。

  参考实例:

  var

    F: File;

  begin

  AssignFile(F, ‘C:\MyFile.txt‘); // 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。

    ReName(F, ‘C:\NewFile.txt‘); // 更名为NewFile.txt

  end;

  19.Writeln
  功能说明:写入一行文本。

  参考实例:

  var

    S: String;

    F: TextFile;

  begin

    S := ‘This is a book.‘;

  AssignFile(F, ‘C:\MyFile.txt‘); // 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。

    Rewrite(F); // 创建新文件

    Writeln(F, S); // 将S变量中的内容写入文本中。

  end;

http://www.cnblogs.com/toosuo/archive/2007/12/17/1001414.html

时间: 2024-10-30 21:43:37

文件、磁盘操作函数的相关文章

几个简单的文件&目录操作函数

一,检测目录是否为空 function isEmptyDir($path){ $handle=opendir($path);----打开路径 while (($item=readdir($handle))!==false){----判断文件名不为假 //循环出$item,如果不是.跟..,那么在if条件里就为真,否则为(空)假 if ($item!="."&&$item!=".."){ return false; } } closedir($hand

R8—批量生成文件夹,批量读取文件夹名称+R文件管理系统操作函数

一. 批量生成文件夹,批量读取文件夹名称 今日,工作中遇到这样一个问题:boss给我们提供了200多家公司的ID代码(如6007.7920等),需要根据这些ID号去搜索下载新闻,从而将下载到的新闻存到以公司ID生成的指定文件夹下!所以第一个问题就是200多个公司,不可能每一次下载,都要去点击:新建文件夹,然后对文件夹命名,too boring and monotonous.嘿嘿,幸好有R的陪伴! let's do it,来看看R如何完成这些工作! 主要用到两个函数 一. dir.create-生

Python文件的操作函数的使用

字符编码 二进制和字符之间的转换过程 --> 字符编码 ascii,gbk,shit,fuck 每个国家都有自己的编码方式 美国电脑内存中的编码方式为ascii ; 中国电脑内存中的编码方式为gbk , 美国电脑无法识别中国电脑写的程序 , 中国电脑无法识别美国电脑写的程序 现在硬盘中躺着 ascii/gbk/shit/fuck 编码的文件, 他们的编码格式已经无法修改了, 所以内存中出现unicode编码, 内存中的unicode编码方式可以识别 ascii/gbk/shit/fuck 编码的

C语言中文件流操作基本函数总结

函数所在头文件:stdio.h 说明:前半部分主要为对各个文件流操作函数的例举,后半部分着重于 上机运行分析.文中部分引用自王桂林老师的C/C++课件. 1.FIELE *fopen(const char*filename,const char *mode) 以mode的方式,打开一个以filename(指针类型)命名的文件, 返回一个指向该文件缓冲区的指针,该指针是后续操作的句柄. 2.int fclose(FILE *stream) fclose()用来关闭先前用fopen()打开的文件.并

PHP文件操作系统----主要的文件操作函数

一.文件操作系统概述 1.概述: php中的文件操作系统主要是对文件和目录的操作.文件在windows系统下分为3种不同:文件.目录.未知,在linux/unix系统下分为7种不同:block.char.dir.fifo.file.link和unknown七种类型.目录在windows系统:D:/a/b/c.php 或 D:\a\b\c.php,在linux/unix系统: /a/b/c.php,为统一建议使用"/"作为目录之间的分割符. 2.目录或文件属性获取函数 *(1)取得文件类

【UNIX环境高级编程】文件 IO 操作 - 基础函数 open close creat lseek write read 详解

博客地址 : http://blog.csdn.net/shulianghan/article/details/46980271 一. 文件打开关闭操作相关函数介绍 1. open 函数 (1) open 函数简介 open 函数解析 : -- 函数定义 : #include <fcntl.h> int open(const char *path, int oflag, ...); -- 函数作用 : 打开或者创建一个文件; -- 返回值 : 打开文件成功, 返回文件描述符; 如果失败, 返回

文件操作函数

open函数 原型: int open(const char *pathname,int flags); int open(const char *pathname,int flags,mode_t mode); flags 必需选项,必选其中之一 O_RDONLY(只读),O_WRONLY(只写),O_RDWR(读写) 可选: O_APPEND 使每次对文件进行写操作都追加到文件的尾端 O_CREAT 如果文件不存在,则创建它,要同时使用第三个参数指定新文件的权限 O_EXCL 查看文件是否存

Delphi 之路 — 文件操作函数 (说明和使用说明)

Delphi 之路 - 文件操作函数 (说明和使用说明) //判断文件是否存在 FileExists //判断文件夹是否存在 DirectoryExists //删除文件 DeleteFile; Windows.DeleteFile //删除文件夹 RemoveDir; RemoveDirectory //获取当前文件夹 GetCurrentDir //设置当前文件夹 SetCurrentDir; ChDir; SetCurrentDirectory //获取指定驱动器的当前路径名 GetDir

C语言文件操作函数的编写

 编写文件操作的头文件 /************************************************************************** Copyright(C)    :2014-08-5 toto Filename       :file.h Author          :涂作权 Version         :V1.1 Date            :2014-08-05 Description     :文件操作的头文件 Others