Dateifilter definieren

[Delbor]

Hi zusammen

Um meinen OpenFileFrame nach bestimmten Dateiendungen zu filtern, habe ich folgenden Typ definiert:

Delphi-Quellcode:

Const
  TExtendedArray : array[0..6] of string =('alle Dateien', '.pdf', '.Docx', '.bmp', '.nef', '.jpg', '.png'); //

Bei Programmstart (z.B.) befülle ich damit eine Combobox:

Delphi-Quellcode:

function TFileSearchContainerFrame. FillCmbxFileType: String;
  var i: integer;
begin
  For i := Low(TExtendedArray) to High(TExtendedArray) do
  begin
    CmbxFileType.Items.Add(TExtendedArray[i]);
    if i = 0 then
      CmbxFileType.Text := CmbxFileType.Items[0];
  end;
  Result := CmbxFileType.Text;
end;

Das Problem dabei ist: damit werden zwar zB. *.bmp - Dateien gefunden (und deren Nodes Enabled dargestellt), nicht aber *.BMP-Dateien.

Wie kann ich gleichzeitig auf zB. '*.bmp' und *.BMP, bzw *htm, *html, *.HTM und *.HTML prüfen?

Gruss
Delbor