Accept est de type boolean
1 2
| Accept := (StrToDate(ChampsString) >= Du) and
(StrToDate(ChampsString) <= Au); |
Veux dire que seul les enregistrements qui réponde à l'expression
(StrToDate(ChampsString) >= Du) et (StrToDate(ChampsString) <= Au)
vont apparaitre dans ta grille.
Dans ton cas qu'est ce que tu va faire c'est seulement une simple proposition :
Deux MaskEdit : MaskEdit1 et MaskEdit2 avec un masque de Date et un boutton devant
On rempli les deux Date dans les maskEdit et au click du boutton tu écris :
MaTable.Filtered := False;
MaTable.Filtered := True;
et dans l'événement OnFilterRecord de la table tu écris :
Accept := (StrToDate(MonChampsString) >= StrToDate(MaskEdit1.Text) and (StrToDate(MonChampsString) <= MaskEdit2.Text);
Tu as aussi un lien http://delphipage.free.fr/bdefiltres.html mais je trouve c'est maigre comme explication.
Partager