2
TStrings.SaveToFileが最後の空の行を作成しないようにするにはどうすればよいですか?
次の.\input.txtようなファイルがあります。 aaa bbb ccc を使用TStrings.LoadFromFileしてそれを読み取り、それを(変更を適用せずに)を使用して書き戻すTStrings.SaveToFileと、出力ファイルの最後に空の行が作成されます。 var Lines : TStrings; begin Lines := TStringList.Create; try Lines.LoadFromFile('.\input.txt'); //... Lines.SaveToFile('.\output.txt'); finally Lines.Free; end; end; 同じ動作がTStrings.Text、最後に空行を含む文字列を返すプロパティを使用して観察できます。