open-/savedialog festgelegte datei laden

[himitsu]

Zitat:

memo1.lines.SaveToFile(filename);

filename gibt doch wohl den Dateinamen an?
Tja, was muß man da wohl ändern.

Delphi-Quellcode:

procedure TForm1.save1Click(Sender: TObject);
begin
  Memo1.lines.SaveToFile('hier den Dateinamen und am Besten inkl. Pfad');
end;

oder eben

Delphi-Quellcode:

procedure TForm1.save1Click(Sender: TObject);
begin
  Memo1.lines.SaveToFile(ExtractFilePath(Application.ExeName) + 'meinDateiname.txt');
end;

(Datei im Programmverzeichnis ... aber besser ist natürlich ein anderer Pfad, da man im Programmeverzeichnis sowas nicht unbedingt speichern sollte ... jedenfalls, wenn es sich dabei um das "Programme"-Verzeichnis von Windows handelt)