摘要：DatFile: TextFile;AssignFile(DatFile, edtDataFile.Text); //生成路径为edtDataFile.Text的文件ReWrite(DatFile);Writeln();CloseFile(DatFile);内容导读： AssignFile 过程将一个外部文件的文件名与一个File 类型的变量关联，对File 类型的变量进行初始化。过程原型如下： procedure AssignFile(var F; FileName: string);AssignFile 过程AssignFile 过程将一个外部文件的文件名与一个File 类型的变量关联，对 阅读全文