ShowFilesAssociationDlg example for C++ Builder

L_INT TForm1::AssociateFiles ( AnsiString strServerAppName ) 
{
   LEADDlgFile1->DlgFlags = 0; 
   LEADDlgFile1->Formats = "LEAD (*.cmp)|*.cmp|DICOM (*.dic)|*.dic|Windows Bitmap (*.bmp)|*.bmp";
   LEADDlgFile1->SelectedExt = "";
   LEADDlgFile1->ServerAppName = strServerAppName; 

   return LEADDlgFile1->ShowFilesAssociationDlg ( this ); 
}