Salut,
Bon j'ai reussi a faire ce que je voulais.
en premier donc faire un evenement("NomProcedure","NomTable",1529)
apres creer autant de booleen a vrai que de colonne qui sont triables.
Global
bColonne1 est un booleen = vrai
bColonne2 est un booleen = vrai
bColonne3 est un booleen = vrai
bColonne4 est un booleen = vrai
ensuite dans la procedure faire comme suit :
PROCEDURE NomProcedure()
LOCAL
Nomchamp est une chaîne
SELON _EVE.wParam // No de la colonne
CAS 1
Nomchamp = "COLONNE1"
SI bDatetrans ALORS Nomchamp = "-COLONNE1" ; bColonne1 = Faux SINON bColonne1 = Vrai
CAS 2
Nomchamp = "COLONNE2"
SI bColonne2 ALORS Nomchamp = "-COLONNE2" ; bColonne2 = Faux SINON bColonne2 = Vrai
CAS 3
Nomchamp = "COLONNE3"
SI bColonne3 ALORS Nomchamp = "-COLONNE3" ; bColonne3 = Faux SINON bColonne3 = Vrai
CAS 4
Nomchamp = "COLONNE4"
SI bColonne4 ALORS Nomchamp = "-COLONNE4" ; bColonne4 = Faux SINON bColonne4 = Vrai
FIN
TableTrie(Table,Nomchamp) // Trie selon le booleen
ProcCalculCumul()
RENVOYER 0 // Kill le message windows
a+++