Text speichern mit SaveDialog

[Tomy]

hallo

ich möchte einen Text speichern. nun weiss ich nicht wie man den Datentyp angeben kann z.B. '.rtf'!

[Luckie]

Im Filter zur Auswahl oder als DefaultExt.

[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...

[Korgan]

Hallo,

Das "with savedialog1 do" brauchst du mMn nicht.

Delphi-Quellcode:

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

[marabu]

Hallo ihr beiden und herzlich willkommen in der Delphi-PRAXiS.

FileName ist eine property von SaveDialog.

Delphi-Quellcode:

with SaveDialog do
begin
  DefaultExtension := 'rtf';
  if Execute then
    Memo.Lines.SaveToFile(FileName);
end;

Getippt und nicht getestet.

Gute Nacht

[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!