Hallo Leutz,

ich habe ein winziges Tool geschrieben, welches Dateien aus einem angegebenem Ordner ausliest und in eine Listbox nur die Dateinamen ausgibt.
Danach kann man die Liste in eine Datei speichern. Dafür benutze ich die Komponente 'SaveTextFileDialog'.

Kann man irgendwie es so machen, dass man beim speichern nur einen Namen für die Datei eingeben muss und es automatisch die Extension dranhängt (am besten die im Filter eingestellt ist), falls es nicht beim Namen eingegeben ist?


Moderiert von UGrohne: Topic aus Sonstiges (Delphi) verschoben am Do 31.05.2007 um 12:46

Ist die Komponente Standard oder Drittanbieter?

Beim SaveDialog kannst du das problem machen, obs bei deiner Komponente geht, kann ich dir nicht sagen, da diese mir völlig unbekannt ist.

Also die Komponente ist bei mir schon immer drin gewesen, also gehe ich davon aus, dass die Standard ist.
Die SaveTextFileDialog sieht genau so aus wie SaveDialog nur man hat bei SaveTextFileDialog noch die Möglichkeit eine Codierung auszuwählen (Die ich eigentlich nicht brauche).

Ich kann auch mein Tool auf Savedialog umstellen, wenns damit einfacher geht.

Du musst einfach nur eine DefaultExtension festlegen

Geht einfach über SaveDialog.DefaultExt:= 'ext';

Delphi-Hilfe hat folgendes geschrieben:

Beschreibung Die Eigenschaft DefaultExt bezeichnet eine Dateierweiterung, die automatisch an den ausgewählten Dateinamen angehängt wird, wenn dieser noch keine registrierte Erweiterung enthält. Wenn der Benutzer eine Datei mit einer nicht registrierten Erweiterung auswählt, wird DefaultExt an die Erweiterung angehängt. Erweiterungen mit mehr als drei Zeichen werden nicht unterstützt. Geben Sie die Erweiterung ohne den Punkt an, der den Dateinamen von der Erweiterung trennt.

LG
Stefan

Das klappt wunderbar

Danke

Habe nur ein kleines Problemchen und zwar wenn ich die Datei als *.xls abspeichere, beim öffnen der Datei mit dem Excel sagt Excel, dass die Datei beschädigt ist und fragt dann ob man fortfahren möchte. Wenn man auf ja klickt öffnet er die Datei so wie es sein muss, aber die Meldung stört.

Kann man das noch irgendwie korrigieren?

Wenn man eine Textdatei als "meinText.xls" abspeichert, dann ist das deswegen noch lange keine Excel-Tabelle. Das merkt dann Excel und versucht, den Inhalt der Datei vernünftig anzuzeigen - was scheinbar auch gelingt.

OK dann lass ich es sein.

Danke nochmal an euch beide.

Du könntest aber die Dateien unter umständen als CSV speichern.

Excel kann CSV lesen und bringt im richtigen Format (glaub Tab-Stop als Seperator) auch keine Fehler.

Kommt aber halt drauf an wie der Inhalt deiner Datei aussieht.