Discussion :

[tchimou]

Bonjour !
J'essaye de filtrer des données entre deux dates , mais je n'y arrive pas. Voici mon code :

Code :

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

1
2
3
  DM.tbCde.Filtered:=True;
  DM.tbCde.Filter:='DATEPERS = 'DateInitiale' and DATEPERS = 'DateFinale' ';
 DM.tbCde.Filtered:=True;

DATEPERS est le nom du champ de la table qui contient les dates.
DateInitiale et DateFinale sont les noms de mes deux objets DateTimerPicker qui me permettent de choisir entre deux dates.
Merci.

[Cl@udius]

Salut

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
var
  sFilter: string;
begin
  sFilter := 'DATEPERS BETWEEN #' + 
    FormatDateTime('mm/dd/yyyy', DateInitiale.Date) + '# AND #' +
    FormatDateTime('mm/dd/yyyy', DateFinale.Date) + '#';
 
  with DM.tbCde do
  begin
    Filter :=sFilter;
    if not Filtered then Filtered := True;
  end;
end;

@+ Claudius

[tchimou]

Merci pour le code , je vais essayer de l'integrer dans mon programme .ça ne va pas être facile; c'est vrai c'est aussi long comme code, je m'attendais à quelque chose comme deux lignes.
Encore merci.

[Cl@udius]

Si tu tiens absolument à 2 lignes alors voilà:

Code :

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

1
2
3
 
DM.tbCde.Filter := 'DATEPERS BETWEEN #' + FormatDateTime('mm/dd/yyyy', DateInitiale.Date) + '# AND #' + FormatDateTime('mm/dd/yyyy', DateFinale.Date) + '#';
DM.tbCde.Filtered := True;

@+

[aityahia]

depuis que j'utilise les requette je me souvient pas trops mais normalement les filtres son cumulable, je m'explique
lorsque on applique un filtre a une table déja filtrer sans le désactivé l'ancien, le nouveau filtres est appliquer aux données déja filter ?

[Cl@udius]

Salut

lorsque on applique un filtre a une table déja filtrer sans le désactivé l'ancien le nouveau filtres et appliquer aux données déja filter ?

Euh non, la condition du filtre sera toujours celle exprimée par la condition Filter. Donc pas de cumul de filtres.

@+

[tchimou]

Merci pour le code en deux lignes,je l'ai essayé , et il me donne un erreur au moment du filtrage;
Merci pour votre aide.

[aityahia]

a mon avis le BETWEEN n'est pas supporté en plus vous n'avez pas a reformaté la date. testé OK

Code :

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

DM.tbCde.Filter:='DATEPERS >= #' +DateInitiale.AsString + '# AND DATEPERS <= #' +DateFinale.AsString+ '#'

[aliwassem]

a mon avis le BETWEEN n'est pas supporté en plus vous n'avez pas a reformaté la date. testé OK

Code :

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

DM.tbCde.Filter:='DATEPERS >= #' +DateInitiale.AsString + '# AND DATEPERS <= #' +DateFinale.AsString+ '#'

Salut
Vous pouvez utiliser le code suivant :

Code :

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

Filter:='Dat >= #' +FormatDateTime('mm/dd/yyyy', DateTimePicker1.Date) + '# AND Dat <= #' +FormatDateTime('mm/dd/yyyy', DateTimePicker2.Date)+ '#';

ca marche avec moi tres bien.....

[aityahia]

Salut
Vous pouvez utiliser le code suivant :

Code :

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

Filter:='Dat >= #' +FormatDateTime('mm/dd/yyyy', DateTimePicker1.Date) + '# AND Dat <= #' +FormatDateTime('mm/dd/yyyy', DateTimePicker2.Date)+ '#';

ca marche avec moi tres bien.....

je suis désolé peut êtres que sa fonctionne mais vous aurai un résultat faut ça ne marche pas comme sa pour les filtres c'est pas comme les requetes. il ne faut pas formater la date il faut juste utiliser le format du system.

[Rayek]

je suis désolé peut êtres que sa fonctionne mais vous aurai un résultat faut ça ne marche pas comme sa pour les filtres c'est pas comme les requetes. il ne faut pas formater la date il faut juste utiliser le format du system.

Bien sur que si qu'il est necessaire de formater la date pour que ca fonctionne, essaie avec mySQL tu verra qu'il n'accepte que le format YYYY-MM-DD pour les dates

[helmis]

Il faudrait décoder le date en utilisant la commande decodedate() sous Delphi ainsi que la re-formater suivant les besoins car le filtre dépend du pilote de la Base de donné considéré.

[aityahia]

j'ai essayé avec Access et sa ne marche pas si je formate les dates meme si avec access quand je fait des requete je doit formater les dates au format (mm/dd/yyyy)
avec MySQL j'ai pas essayer ?

alors j'ai déduis que les filtres sont exécuter au niveau de mon objets TABLE et les requetes au niveau du serveur de base de données , alors je me suis tromper.

[aliwassem]

Salut
Alors mo je travaiile avec access et toujour je format les dates quand je fais insertion des datas ou quand je Selection ou une requet c'est toujours je doit le Formater....

il ne faut pas formater la date il faut juste utiliser le format du system.

alors quand vous inserez les donnees n'utilisez pas le format du systeme , il faut de refoamter comme

Code :

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

FieldByName('Dat').Value := FormatDateTime('MM/DD/YYYY',DateTimePicker1.Date);

[tchimou]

merci pour vos reponses et suggestions;