IL fo tous dabor crée une variable Boolean
en va l'appelé Etas
- Code:
-
bool Etas ;
Ensuite il faut initialiser la variable en true généralement
de préférance dand le show de la fenétre qui contien DBGrid
- Code:
-
void __fastcall TForm1::FormShow(TObject *Sender)
{
Etas = true ;
}
Ensuite en va dans l'événement de la DBGrid qui est TitleClick et vous coller le code si dessou
- Code:
-
void __fastcall TForm1::DBGrid1TitleClick(TColumn *Column)
{
AnsiString Type_de_trie,Requette ;
//////// Tris croissant et décroissant ///////////////
if (Etas == True)
{
Type_de_trie =" ASC"; /// croissant
Etas = False;
}
else
{
Type_de_trie =" DESC"; /// Décroissant
Etas = True;
}
Requette = Column->Field->FieldName+Type_de_trie ; /// Requétte sql dans une string
ADOQuery1->SQL->Clear() ;
ADOQuery1->SQL->Add("select * from operation order by "+Requette+""); /// Exécuter la requétte
ADOQuery1->ExecSQL() ;
ADOQuery1->Close() ;
ADOQuery1->Active = true ;
}
by lotficrew