Filterfehler bei FileListBox

[Harry Stahl]

Zitat von Delfiano:

Wenn ich bei der FileListBox (Delphi 5) als Mask '*.MMP' angebe, werden auch '*.MMPZ' gelistet.

Wie kann ich das vermeiden und bringe Delphi dazu, wirklich nur Dateien der gewünschten Endung zu zeigen und diese nicht eigenmächtig zu erweitern?

Ich hab jetzt keine Lust dazu, dafür extra eine neue Komponente programmieren zu müssen.

Also ich habe hier auch noch ein Delphi 5 (Update 1) laufen.

Dort zeigt die

Maske " *.MMP " alle .MMP Dateien an
Maske " *.MMPZ " alle .MMPZ UND alle .MMP Dateien an
Maske " *.MMP* " zeigt ALLE Dateien an.

Du kannst aber auch mit diesen Kompontenten das richtige Ergebnis erhalten, wenn Du in der Maske noch zusätzlich den Pfad angibst, also "D:\*.MMPZ" dann werden nur .MMPZ Dateien angezeigt, aber keine .MMP Dateien.

Sieh dir mal den anliegenden Screenshot an, da ist alles so wie es sein soll.

Übrigens: Im aktuellen Delphi 10.4.2 funktioniert diese (Steinzeit Win 3.1 -) Komponente übrigens von Anfang an, so wie es sein soll...

Delphi-Quellcode:

procedure TForm1.DirectoryListBox1Change(Sender: TObject);
begin
  FileListBox1.Directory := DirectoryListBox1.Directory ;
  FileListBox2.Directory := DirectoryListBox1.Directory;
  FileListBox3.Directory := DirectoryListBox1.Directory;

  FileListBox1.Mask := DirectoryListBox1.Directory + '\' + Edit1.text;
  FileListBox2.Mask := DirectoryListBox1.Directory + '\' + Edit2.text;
  FileListBox3.Mask := DirectoryListBox1.Directory + '\' + Edit3.text;
end;