delphi读取文件如何判断结束