i:= ListeEvenement.ColCount;
ListeEvenement.ColCount := ListeEvenement.ColCount + 1;
ListeEvenement.Cols[i].Assign(ListeEvenement.Cols[3]);
ListeEvenement.ColWidths[3]:=0;

Con questo codice riesco ad aggiungere in fondo una colonna:
Assegnare i valori della colonna che voglio che far sparire dalla terza posizione;
E infine portare a 0 le dimensioni della colonna che voglio rendere invisibile.

e se dovessi fare il contrario, ossia spostare la colonna dall'ultima alla prima???
Come fare??

C'è un sistema meno complicato??