我觉得这应该很简单，但谷歌完全失败了我。我想打开一个文件，或创建它，如果它不存在，并写入它。
下列
AssignFile(logFile,'Test.txt'); Append(logFile);
当文件不存在时，会在第二行引发错误，我认为这是一个预期。但是我真的很失望地找出如何a)测试文件是否存在，以及b)在需要时创建它。
FYI，在德尔福XE工作。
解决方法
您可以使用
FileExists功能，然后使用
Append(如果存在)或
Rewrite(如果不存在)。
AssignFile(logFile,'Test.txt');
if FileExists('test.txt') then
Append(logFile)
else
Rewrite(logFile);
//do your stuff
CloseFile(logFile);