Text speichern mit SaveDialog

[zahor]

Ich würde es so machen:

Delphi-Quellcode:

procedure TForm1.speichernunter1Click(Sender: TObject);
begin
  Memo1.Text := Liste.Text;
  if savedialog1.Execute
    then memo1.lines.SavetToFile(savedialog1.filename);
end;

kann sein dass es an der eigenschaft text liegt,
d.h. dass wenn liste auch ein memo1 oder sowas ist,
dann würde ich sagen:

Delphi-Quellcode:

procedure TForm1.speichernunter1Click(Sender: TObject);
begin
  Memo1.Lines := Liste.Lines;
  if savedialog1.Execute
    then Liste.lines.saveToFile(savedialog1.filename);
  //oder:
  // then Memo1.Lines.SaveToFile;
  // kommt ja auf's selbe raus.
end;

und noch was: den inhalt von einem memo als rtf zu speichern,
bringt imho überhaupt nix.
das ist wie bei notepad: die formatierung wird nicht mitgespeichert
(bei mir jedenfalls nicht)


Dann noch viel Glück!