Text speichern mit SaveDialog

[brsx]

ich weiß auch nicht genau wie ich das speichern soll, doch ich bin ein stück weiter

Delphi-Quellcode:

procedure TForm1.speichernunter1Click(Sender: TObject);
begin
   memo1.Text:=liste.text;
   if savedialog1.Execute then
  with savedialog1 do  liste.savetoFile(filename);

end;

doch nun tritt ein problem auf. ich kann zwar eine text datei speichern, doch diese ist immer leer und der text, welcher vorher in mein memo feld war ist nicht in der Textdatei.

ich hoffe ihr könnt mir weiterhelfen...