Sorted records on DBGrid

when i compile this code Quand je compile ce code

Code:

---

1 2 3 4 5 6 7

procedure TForm1.DBGrid1TitleClick(Column: TColumn); begin if FDTable1.IndexFieldNames = column.Field.FieldName then FDTable1.IndexFieldNames := column.Field.FieldName + ' DESC' else FDTable1.IndexFieldNames := column.Field.FieldName; end;

---

i receive an error msg j'obtiens ce message d'erreur :

L'objet [<exp-Num>DESC] est introuvable

Bonjour,(une formule de politesse n'a jamais fait de mal à personne)

Tout d'abord je vous signale que le forum est un forum de langue française. Merci de bien y faire attention.

Pour le fond : le premier point est que votre titre porte sur DBGrid alors que le sujet réel est Firedac, soit la source de données de la grille et non la grille.
Pour la forme :
Lectures : généralités, détail, penchez-vous aussi sur Expression
il me semble (semble car je n'ai pas fait le test) qu'il aurait fallu écrire

Code:

---

1 2 3 4 5 6 7

procedure TForm1.DBGrid1TitleClick(Column: TColumn); begin if FDTable1.IndexFieldNames = column.Field.FieldName then FDTable1.IndexFieldNames := column.Field.FieldName+ ':D' else FDTable1.IndexFieldNames := column.Field.FieldName; end;

---

Bien évidemment une autre manière de faire serait de ne pas passer par un FDTable mais une FDQuery avec utilisation de macros pour le tri mais c'est un autre débat.

mr. SergioMaster
merçiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii bcp

Citation:

---

merçiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiii bcp

---

Un petit :plusser: eut été plus apprécié