Simone
功能说明：以可写方式打开文件。如果文件不存在，将会自动创建。使用该函数，将凯乎会覆盖文件中的所有内容。 参考实例： var F: TextFile; // 声明文本文件类型变量 begin AssignFile(F, 'C:\MyFile.txt'); // 将C:\MyFile.txt文件与F变量建立连接，后面可以使用F变量哪孙铅对文件进行操作。 Rewrite(F); // 打开文件。如果文件不存在，将会在C盘中创建MyFile.txt文件。如果文件存在，将会覆盖MyFile.txt中的所有内容。 end;+++++++++++++++++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;++++++++++++++++++++++++//判断文件是否存在 FileExistsvarf: string;beginf := 'c:\temp\test.txt';if not FileExists(f) thenbegin //如果文件不存在end;end;
