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;