Bonsoir,
J'ai fait un petit test dans le 
OnCellClick d'un DBGrid, relié a une table avec un TDataSource et un TADOTable.
	
	1 2 3 4 5 6 7 8 9 10 11 12 13
   |  
switch (Column->Field->DataType )
{
        case ftString :
                ShowMessage("ceci est un string...");
        break;
        case ftInteger:
                ShowMessage("entier");
        break;
        default:
                ShowMessage(Column->Field->DataType);
        break;
} | 
  Pour l'index, je pensais pouvoir tester avec :
	
	1 2
   |  
Column->Field->IsIndexField //.....  | 
  mais a priori, il ne réagis pas comme je l'espérais...
En plus, il est un peu tard et je me fais vieux ...
En espérant t'aider @ + 

 
			
		
Partager