Discussion :

[lou_delphdev]

bonjour ou bonsoir tout le monde!!!

mon probleme et de filtrer une Ttable de puis un champ date à partir du mois seulment, mais sans utilisé des Tquery!!!

j'ai essayé d'utiliser les filters mais je ne suis pas arrivé, j'ai trouvé dans les Tquery, mais mon aplication contien que des Ttable!!!


Votre aide me sera d'une tres grande utilitée!!!

Et veuiller accepter mes remerciment distingués

[Rayek]

En utilisant la fonction rechercher sur ce forum + le mot filter tu trouveras ta réponse

[ShaiLeTroll]

Hum, la manipulation de Date, pas évident surtout sur Paradox (TTable \ TQuery c'est ce format en général), si tu teste la date dans intégralité c'est facile, mais si tu ne veux que la notion de mois, il faut faire un interval entre le premier et dernier jour de ce mois

et puis Google 'TTable Filter Date Delphi Paradox", on trouve ce lien Faq Delphi - Club d'entraide des développeurs francophones

[akli_agha]

Il faut utiliser l'évenement OnFilterRecord de votre TTable.
Dans cet evnt, on décortique la date pour avoir le mois et on décortique le champs Date de votre Table pour avoir, également, le mois. Ensuite on utilise le paramètre Accept fourni dans l'evnt.

Ex :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 
procedure TForm1.Table1FilterRecord(DataSet: TDataSet;
  var Accept: Boolean);
var
  aa, mm1, mm2, jj: Word;
begin
  //Date de Référence
  DecodeDate(DateRef, aa, mm1, jj);
  //Date de la table
  DecodeDate(DateField, aa, mm2, jj);
  //Filtre
  Accept := mm1 = mm2;
end;

NB : N'oubliez pas de mettre la propriété Filtered de votre Table à True !


Bon Dev.