Auf den letzten char in einer Datei zugreifen

[KodeZwerg]

Vielleicht hilft Dir das hier...

Delphi-Quellcode:

procedure SchreibeCSV;
var
  Inhalt: TStringList;
begin
  Inhalt := TStringList.Create;
  try
    Inhalt.Add('abc,123,xyz');
    Inhalt.SaveToFile('Dateiname.csv');
  finally
    Inhalt.Free;
  end;
end;

So könnte man eine frische Datei erzeugen.
Per Inhalt.Add was auch immer einfügen.
Per SaveToFile abspeichern, fertig.
Viel Spass.