Assignfile: Datei nicht gefunden

[TiGü]

Muss das wirklich mit AssignFile passieren?
Das wirkt immer so Turbo Pascal mäßig.

Wie ist denn mit dem guten alten Filestream?

Delphi-Quellcode:

var
  DeinFileStream: System.Classes.TFileStream;
begin
  DeinFileStream := TFileStream.Create(str1, fmCreate);
  try
    // Hier kann man mit den verschiedenen DeinFileStream.Write(...) Methoden
    // die Daten in die Datei schreiben!
  finally
    DeinFileStream.Free;
  end;
end;

PS: Screenshots bitte nicht mit den Handy machen, dass ist super unleserlich.
Bitte einfach mit Alt + Druck undPaint oder dem Snipping-Tool oder "Ausschneiden und Skizzieren" (neue Windows 10 App) arbeiten.