读取未知扩展名的文本文件

Question

用delphi怎么实现读取未知扩展名的文件（文件能用写字板打开打开）
并且一次读一行readln只能读txt的文本文件

Answer 1

写字板？不是记事本？写字板支持的许多文件都是带格式控制的，不一定是简单的文本文件。其实，一个文件只要是文本文件，都可以用读取文本文件的方法读取啊，管他是什么后缀名，delphi又不是根据后缀来决定如何读取的。

Answer 2

什么文件你都当成文本文件来处理就可以了，但是如果文件中包含 ^Z 文件结束符，可能就不妙了。可以使用 TStringList.LoadFromFile 方法将文件数据读取到类实例中，读取类的 Lines 属性，就可以得到每一行了。