delphi assignfile用法

1.文本文件新建和读取使用

在窗体放一个按钮，点击输入

procedure TForm1.Button1Click(Sender: TObject);

var

bat : textfile;

begin

assignfile(bat, 'c:\123.txt'); //新建并打开文件

rewrite(bat); //Rewrite 过程能创建一个新文件并打开它；使用Reset 打开的

//文本文件是只读的，使用Rewrite 和Append 打开的文本文件只能写入

writeln(bat, '1111111111111111'); //写入数据

closefile(bat); //关闭文件

end;

//这样在C盘就新建一个123.txt的文本文件，并写入1111111111111111的数据。

2.读取文本文件

procedure TForm1.Button1Click(Sender: TObject);

var

bat : textfile;

s : string;

begin

assignfile(bat,'c:\123123.bat');

reset(bat);

readln(bat,s);

memo1.Lines.Add(s);

closefile(bat);

end;

Procedure or

function

Description

Append

打开存在的文本文件（用于对文件追加文本）。

AssignFile

指定外部文件的文件名到文件变量。

BlockRead

从无类型文件读出一个或多个记录。

BlockWrite

向无类型文件写入一个或多个记录。

ChDir

改变当前目录。

CloseFile

关闭打开的文件。

Eof

返回文件的文件结束（end-of-file）状态。

Eoln

返回文本文件的行结束（end-of-line）状态。

Erase

删除外部文件。

FilePos

返回类型文件或无类型文件的当前位置。

FileSize

返回文件的当前尺寸；不适用于文本文件。

Flush

刷新输出文本文件的缓冲区。

GetDir

返回指定驱动器的当前目录。

IOResult

返回表示最后一次I/O函数执行状态的整数值。

MkDir

创建子目录。

Read

从文件读出一个或多个值到一个或多个变量。

Readln

在文本文件中执行Read操作并跳至下一行行首。

Rename

对外部文件重命名。

Reset

打开存在的文件。

Rewrite

创建并打开新文件。

RmDir

删除空的子目录。

Seek

从类型文件或无类型文件的当前位置移动到指定的分量；不适用于文本文件。

SeekEof

返回文本文件的文件结束（end-of-file）状态。

SeekEoln

返回文本文件的行结束（end-of-line）状态。

SetTextBuf

指定输入/输出（I/O）缓冲区到文本文件。

Truncate

在类型文件或无类型文件的当前位置截断文件。

Write

向文件写入一个或多个值。

Writeln

在文本文件中执行Write操作然后写入一个行结束（end-of-line）标记。

函数 描述

StrAlloc

在堆中分配给定尺寸的字符缓冲区

StrBufSize

返回用StrAlloc或StrNew分配的字符缓冲区的尺寸

StrCat

连接两个串

StrComp

比较两个串

StrCopy

复制一个串

StrDispose

释放用StrAlloc或StrNew分配的字符缓冲区

StrECopy

复制串并返回串尾指针

StrEnd

返回串尾指针

StrFmt

格式化一个或多个值到一个串中

StrIComp

比较两个串（大小写不敏感）

StrLCat

连接两个串（给定结果串的最大长度）

StrLComp

比较两个串（给定最大长度）

StrLCopy

复制串直到给定的最大长度

StrLen

返回串的长度

StrLFmt

格式化一个或多个值到一个串中（给定串的最大长度）

StrLIComp

比较两个串（给定最大长度且大小写不敏感）

StrLower

转换一个串到小写

StrMove

从一个串移动字符块到另一个串

StrNew

在堆中分配串

StrPCopy

复制一个Pascal串到一个空结束串

StrPLCopy

复制一个Pascal串到一个空结束串（给定最大长度）

StrPos

返回给定子串在串中第一次出现的位置指针

StrRScan

返回给定字符在串中最后一次出现的位置指针

StrScan

返回给定字符在串中第一次出现的位置指针

StrUpper

转换一个串到大写