Textdatei speichern: Speicherort bestimmen.

[xZise]

Moin,

Zitat von p80286:

@bassmann
dann hast Du aber

Delphi-Quellcode:

writeln(Datei, raum); 
  writeln(Datei, datum); 
  writeln(Datei, edit1.text);

unterschlagen.[...]

Bisschen kopieren vorher

Delphi-Quellcode:

var
  sl : TStrings;
begin
  sl := TStringList.Create;
  try
    sl.Assign(Memo1.Lines);
    sl.Insert(0, raum);
    sl.Insert(1, datum);

    // Alternativ statt des assigns da oben, dürfte auch das gehen:
    sl.AddStrings(Memo1.Lines);
    // Dann kann man aus Insert ein Add machen.

    sl.SaveToFile(...);
  finally
    sl.Free;
  end;
end;

MfG
Fabian