Delphi-PRAXiS - Delphi SavetoFile + Directory

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi SavetoFile + Directory (https://www.delphipraxis.net/118705-savetofile-directory.html)

julchen

13. Aug 2008 10:18

SavetoFile + Directory

Hallo,

ich möchte mit SaveToFile eine Datei in einem Ordner speichern, den ich in einer DirectoryListBox markiert habe. Doch eine Methode/Funktion der Dateiverwaltung kann ich ja nicht vor den Dateinamen setzen, weil der Verzeichnis-/Ordnername sonst als Dateiname mit einbezogen wird.
Wie kann ich vor dem Speichern den Speicherort in einer DirectoryListBox festlegen?

DeddyH

13. Aug 2008 10:35

Re: SavetoFile + Directory

Ich bin nicht ganz sicher, ob ich das Problem richtig verstanden habe, aber willst Du so etwas?

Delphi-Quellcode:

			ShowMessage(IncludeTrailingPathDelimiter(DirectoryListbox.Directory) + ExtractFilename(Dateiname));
		

Wenn die Ausgabe so stimmt, kannst Du ja mit SaveToFile dorthin speichern.

julchen

13. Aug 2008 11:21

Re: SavetoFile + Directory

Delphi-Quellcode:

			RichEdit1.Lines.SaveToFile(IncludeTrailingPathDelimiter(DirectoryListbox.Directory) + ExtractFilename(Dateiname));
		

Funktioniert!
Vorläufig, erstmal Danke!

[EDIT] Habe jetzt auch meinen Fehler gefunden:
Der Ordner muss geöffnet werden und nicht nur angeklickt.
Darauf habe ich gar nicht geachtet :wall: [/EDIT]

Alle Zeitangaben in WEZ +1. Es ist jetzt 06:41 Uhr.