Message de rapport:
 

Re: Petit défi sur tableau

Sujet: Re: Petit défi sur tableau
par KPiTN sur 19/5/2005 11:10:46

A mon avis il faut
- que tu ais une colonne cachée avec la valeuraffichée de ta combo
- que tu interceptes le tri de la combo
- que tu tri non plus par ta combo, mais par ta colonne cachée

code pour trier une colonne (Merci a Romain Petit)
***** Déclarations globales de la fenêtre 
//Evenement pour détecter le clic sur en-tête de colonne 
gf_eEvClicTable est un entier 
//Pour le tri multiple 
g_bTriMulti est un booléen 


***** Initialisation de la fenêtre 
sNomTable est une chaine = "MaTable" 
gf_eEvClicTable=Evénement("pl_­ClicEnTeteTable", sNomTable, 1529) 


***** Fermeture de la fenêtre 
SI gf_eEvClicTable<>0 ALORS FinEvénement(gf_eEvClicTable) 


***** Procédure locale pl_ClicEnTeteTable 
PROCEDURE pl_ClicEnTeteTable(sMess, wParam, lParam) 


sNomTable est une chaîne = "MaTable" 
sNomColonne est une chaîne = "MaColonneATrier" 
eRes est un entier = CurseurPos(cpClient) 
eX est un entier 
eX = PoidsFaible(eRes)-{sNomTable,i­ndChamp}..X 


sNomColCliquée est une chaîne 
sNomColCliquée =TableEnumèreColonne(sNomTable­,wParam) 
// La colonne correspond-elle à celle à trier ? 
SI sNomColCliquée=sNomColonne ALORS 
        //On ne prend pas en compte le clic si la loupe est présente 
        //(à environ 10 pixels) 
        SI eX < {sNomTable+"."+sNomColonne,ind­Champ}..Largeur-10 ALORS 
                si gf_bTriMulti alors 
                        TableTrie(sNomTable,"+COL1","+­COL2") 
                sinon 
                        TableTrie(sNomTable,"-COL1","-­COL2") 
                FIN 
                gf_bTriMulti = PAS gf_bTriMulti 
                // Le renvoyer 0 permet d'annuler 
                // le tri sur la colonne seule 
                RENVOYER 0 
        FIN 
FIN 


Plus d'info pour intercepter le tri d'une colonne ici

http://groups.google.fr/group/fr.comp.developpement.agl.windev/browse_thread/thread/15abdf19339ac167/5ecf5f345fa8c1dd?q=trier+colonne&rnum=7&hl=fr#5ecf5f345fa8c1dd
Connexion
Menu
Chercher WDForge
Chercher Web
Partenaires
Visualiser tous les Partenaires...
WinDev, WebDev, WinDev Mobile et HyperFile sont des marques déposées par PCSoft. |  Voter |  Legal |  Contact |   XOOPS 2.0.13.2