Discussion :

[tchimou]

Bonjour!
je voudrais faire un tri dans ma table , j'affiche mes données dans un DBgrid, j'ai un champs reference qui est numerique et un champs date , je voudrais faire un tri et afficher par exemple les données par reference(du plus petit au plus grand) ou par date(la date la moins ancienne).
Je ne voudrais pas utiliser du code sql , mais le faire autrement , mais helas , je ne souviens plus du code en delphi pour faire cela.
Merci de votre aide.

[tchimou]

j'ai ecris ce code pour faire le tri de la table par date , mais il ne fonctionne pas;

Code :

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

1
2
3
4
5
6
7
procedure TGestionForm.RadioDateClick(Sender: TObject);
begin
   if RadioDate.Checked = True then
   begin
     DM.tbCaisse.IndexFieldNames:=DM.tbCaisseDATECAISSE.AsString;
   end;
end;

j'ai essayé avec AsString , DisplayFormat ,AsVariant , mais rien qui fonctionne.
Merci de votre aide.

[mamou30]

Citation

j'ai ecris ce code pour faire le tri de la table par date , mais il ne fonctionne pas;
Code :
procedure TGestionForm.RadioDateClick(Sender: TObject); begin if RadioDate.Checked = True then begin DM.tbCaisse.IndexFieldNames:=DM.tbCaisseDATECAISSE.AsString; end; end;

ma question et tu veut filtré les données par date ou
faire un order by date
veut tu préciser.......

[tchimou]

je voudrais trier par date( afficher la date la moins ancienne ou bien la plus actuelle).Mais je ne voudrais pas utiliser du code sql.
Merci

[mamou30]

la méthode la plus facile et de faire créer un index secondaire sur le champ
date (EX: Nom d'index Cdate)

Code :

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

1
2
3
4
5
6
7
8
 
procedure TGestionForm.RadioDateClick(Sender: TObject); 
 
begin 
if RadioDate.Checked = True 
then begin 
DM.tbCaisse.IndexName:='Cdate';
 end; end;

[liazidf]

Bonsoir,
La soluce de mamou30 est correcte, néanmois vous pouvez creer un index secondaire, avec les deux champs (Ref, Date), et si vous utilisez JvDBGrid de la JVCL, vous pouvez verifier aisement l'action des indexes.

[tchimou]

merci beaucoup, ça fonctionne très bien.