/*
Filter, Mask example
This example uses a filter combo box and a file list box on a form. When the user selects a filter in the filter combo box, the file list box displays only files which match the selected mask:
*/ 
void __fastcall TForm1::FilterComboBox1Change(TObject *Sender)
{
  FileListBox1->Mask = FilterComboBox1->Mask;
}

void __fastcall TForm1::FormCreate(TObject *Sender)
{
  FilterComboBox1->Filter = "All files (*.*)|*.*| Header files (*.h;*.hpp)|*.h;*.hpp";
} 
