Open- und SaveDialog Falscher Filter

[Larsi]

Hi,
ich habe ein komisches Problem. Also ich speichere die Listbox Einträge so ab in meinem Programm:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
if saveDialog1.Execute = true then
Listbox1.Items.savetoFile(saveDialog1.FileName + '.lip');
end;

Beim dem SaveDialog habe ich als Filter *.lip (hab ich mir ausgedacht -> Eigene Dateiendung) eingegeben. Wenn ich jetzt einen Dateinamen eingebe, dann wird die Datei auch abgespeichert und wird von Windows im Explorer auch korrekt "gesehen". So lade ich die Datei wieder:

Delphi-Quellcode:

procedure TForm1.ccButton2Click(Sender: TObject);
begin
if OpenDialog1.Execute = true then
Listbox1.Items.LoadFromFile(OpenDialog1.FileName);
end;

Im Filter vom OpenDialog steht das gleiche drinnen wie im SaveDialog. Allerdings wird im OpenDialog die Datei nicht angezeigt wo ich sie abgespeichert habe; Windows Explorer sagt mir auch das sie mit der richtigen Dateiendung existiert. Wenn ich aber im OpenDialog als Dateiname die korrekte Datei eingebe, dann wird Sie geladen. Kann mir jemand sagen wie ich dieses Problem beheben kann?

MFG Lars Wiltfang

[DeddyH]

Haben beide Dialoge denselben Filter?

P.S.: Bitte nie auf true abfragen ;)

[hamburcher]

Zitat:

Zitat von DeddyH

...
P.S.: Bitte nie auf true abfragen ;)

Warum?
Machte das bisher von TurboPascal 3.0a bis Delphi7pe.

Ist IMHO zwar nicht schön, aber so fängt man mit der Pascal-Logik nun mal an.

Konkreter als das Nachplappern bitteschön:
Warum nie auf true abfragen?

:wiejetzt:

[jfheins]

Zitat:

Zitat von hamburcher

Warum nie auf true abfragen?

:wiejetzt:

http://www.delphipraxis.net/internal...ct.php?t=68256 ;)

[Larsi]

Zitat:

Zitat von DeddyH

Haben beide Dialoge denselben Filter?

Zitat:

Zitat von Larsi

Im Filter vom OpenDialog steht das gleiche drinnen wie im SaveDialog.

Erst lesen, dann denken. :mrgreen:

[Die Muhkuh]

Warum speicherst Du explizit mit .lip ab? Wenn Du einen Filter hast, geht das automatisch.

In beiden Dialogen sollte DefaultExt noch auf lip gesetzt werden.

[hamburcher]

Zitat:

Zitat von jfheins

Zitat:

Zitat von hamburcher

Warum nie auf true abfragen?

:wiejetzt:

http://www.delphipraxis.net/internal...ct.php?t=68256 ;)

Geh' doch bitte einfach nur davon aus, daß ich die Informationen des Links bereits kenne.

Als erstes habe ich damals gelernt, das Variablen wackeln können und daher einen festen Boden brauchen.

:mrgreen: :mrgreen: :mrgreen:

[littleDave]

Kann es sein, dass du im Filter-Editor bei der Dateiendung
.lip und nicht *.lip eingegeben hast? Wenn nur .lip darsteht, werden im Dialog nur Dateien angezeigt, die wirklich nur .lip heißen.
Bei *.lip werden alle Dateien angezeigt, die auf .lip enden.

[DeddyH]

Zitat:

Delphi-Quellcode:

Listbox1.Items.savetoFile(saveDialog1.FileName + '.lip');

Auch sehr sinnig. Wenn ich nun "Wuppdi.lip" eingebe, wird "Wuppdi.lip.lip" draus :mrgreen: