Memo speichern

[Satty67]

Er antwortet gar nicht mehr, hoffe er war nicht mit der letzten Version zufrieden?

Zudem könnte sein, das er nicht sieht, was offensichtlich ist:

Delphi-Quellcode:

procedure TForm1.BitBtn1Click(Sender: TObject);
begin 
  IF SaveDialog1.Execute
     THEN
        begin
        Memo1.Lines.SaveToFile({Open}SaveDialog1.FileName);
        end;