Denkst bestimmt, das ich nur den fertigen code will.
Aber is nicht so. Will und muss Delphi verstehen.
Delphi-Quellcode:
procedure TForm1.btn_einClick(Sender: TObject);
begin
datei := TStringList.Create;
nachricht := edt_nachr.Text;
try
datei.Add(nachricht);
datei.SaveToFile('notiz.txt');
finally
datei.Free;
end;
end;