Discussion :

[olivier29]

quelle méthode utiliser pour trier automatiquement par ordre alphabétique les enregistrement d'une dbgrid.
j'utilise une base access j'ai fait une requete trie mais je ne sais pas comment l'exploiter avec builder et je ne sais pas si c'est la meilleure méthode.

[BrunoMolto]

Bonjour:

SELECT * FROM MATABLE ORDER BY LE_CHAMP_A_CLASSER ASC

Voilà!

[Djob]

Tout à fait.
Surtout pour si la grille est reliée à 1 TQuery.(BDE)

pour completer....
Si tu utilises une TTable (BDE)
tu peux jouer sur la propriété IndexFieldNames qui trie les enregitrements de façon ascendante une colonne :
exemple de tri dynamique:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
//evenement Click sur titre de Colonne (OnTileClick)
void __fastcall TForm1::DBGrid1TitleClick(TColumn *Column)
{
  try{
    ((TTable*)(Column->Field->DataSet))->IndexFieldNames=Column->FieldName;
  }catch(Exception &e){}
}

ou sinon si tu utilises des composants ADO,
il y a la propriété Sort .

exemple avec TADOTable ou une requete TADOQuery qui permet de trier par colonne
de manière ascendante ou descendante, en cliquant sur l'en tete d'une colonne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
 
//evenement Click sur titre de Colonne (OnTileClick)
void __fastcall TForm1::DBGrid1TitleClick(TColumn *Column)
{
  try{
 
    AnsiString SortExpr ="";
    if(Column->Field->Tag==0){        //tag conserve l'etat de tri (ascendant /descendant).
        SortExpr = Column->FieldName+" ASC";
        Column->Field->Tag=1;        
    }else {
        SortExpr = Column->FieldName+" DESC";
        Column->Field->Tag=0;
    }
 
   // avec TADOQuery
   // ((TADOQuery*)(Column->Field->DataSet))->Sort = SortExpr;
 
  // avec TADOTable
  ((TADOTable*)(Column->Field->DataSet))->Sort = SortExpr;
 
  }catch(Exception &e){}
}
//---------------------------------------------------------------------------
//affichage curseur main evenement OnMouseMove de TDBGrid
void __fastcall TForm1::DBGrid1MouseMove(TObject *Sender,
      TShiftState Shift, int X, int Y)
{
  TDBGrid * Grid = (TDBGrid*)Sender;
  TGridCoord  coord = Grid->MouseCoord(X,Y);
  if( coord.Y == 0 )  Grid->Cursor =crHandPoint;
  else    Grid->Cursor=crDefault;
}
//---------------------------------------------------------------------------

[olivier29]

merci pour l'info.
ca fonctionne , j'ai meme fais une simulation de clic sur la colonne a l'activation de la forme.
mais mon soucit est que j'ai une colonne dans laquelle je fais un graphe pour chaque ligne.
ce graphe est fait par labels de focon dynamique et qunad je fais le tri
mes graphes ne correspondent plus a la bonne ligne.
si quelqu'un a une idee?