Comment utiliser un query à partir d'un timedatepicker ?

Version imprimable

24/08/2005, 09h25
bertrand_declerck

Comment utiliser un query à partir d'un timedatepicker ?

Bonjour

j'aimerai lorsque j'indique un chiffre dans un edit et après avoir pressé sur un bouton que mon dbgrid affiche tous les éléments dont le champ Echeance (de type date) est inférieur à la date résultante de la date de mon timedatepicker - le nombre pressé !

ainsi si la date est celle d'aujourd'hui soit

24/08/2005 - ce que j'ai mis dans mon edit = 30
le résultat de ce calcul est mis dans une requête du style

Where Echeance > Moncalcul . Pour connaître par exemple les échéances depuis 30 jours.

Je n'arrive pas à mettre cela dans un query.

Merci de vos précieux conseils

Code:

1 2 3 4 5 6 7 8 9 With Query do begin Close; SQL.Clear; SQL.add('select * from [LA_Table]'); SQL.Add('Where [Echeance] > ' + FormatDateTime('[Le format]', DateTimePiket1.datetime - strtoint(edit1.text))); Open; end;
Normalement, comme ca, ca devrait fonctionner, faut juste que tu remplaces ce qui est entre [] par tes valeurs a toi.

24/08/2005, 10h28
bertrand_declerck

ok

Milles merci !
24/08/2005, 11h39
bertrand_declerck

Une petite question :

Que faut-il mettre à FormatDateTime('[?????]', ...

tu as mis "Le Format"

C'est à dire ?
24/08/2005, 14h25
Magnus

Citation:

Que faut-il mettre à FormatDateTime('[?????]',

Fais F1 sur cette fonction et tu trouveras rapidement ta réponse :wink:

J'ai aussi 2 remarques :
- fais attention aux résultats que tu risques d'obtenir si tu mélanges des types TDate et TDateTime (dans ton Edit tu récupéres un TDate ou un TDateTime ?) => je parle par expérience.
- tu peux aussi utiliser les fonctions DecodeDate[Time] et EncodeDate[Time] pour calculer des intervalles de temps, cf l'aide en ligne.
24/08/2005, 14h31
Rayek

Citation:

Envoyé par bertrand_declerck

Une petite question :

Que faut-il mettre à FormatDateTime('[?????]', ...

tu as mis "Le Format"

C'est à dire ?

le format necessaire a ta base de données (Access : MM/DD/YYYY, MySQL YYYY-MM-DD, etc ...)
24/08/2005, 15h37
bertrand_declerck

ok

Merci

cela m'a l'air bien compliqué en tout cas l'utilisation de date !

C'est pas ma journée apparemment !

Code:

1
2
3
4
5
6
7
8
9
 
With Query1 do
begin
  Close;
  SQL.Clear;
  sql.Add('SELECT CLIENTS.CLINOM1 AS CLIENTS , Sum(MVTS.MVTDEBIT) - Sum(MVTS.MVTCREDIT) as Somme   ');
  SQL.Add('FROM CLIENTS INNER JOIN MVTS ON CLIENTS.CLICODE = MVTS.MVTCOMPTE ');
  SQL.Add('WHERE  MVTS.MVTDATEDOC >  ' + FormatDateTime('[MM/DD/YYYY]', DateTimePicker3.DateTime)  );
  SQL.Add('GROUP BY CLIENTS.CLINOM1  ');

Cela plante en me disant qu'il ya trop peu de paramètres attendus !

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
With Query1 do 
begin 
  Close; 
  SQL.Clear; 
  SQL.Add('SELECT   CLIENTS.CLINOM1 AS CLIENTS, '+
          '         SUM(MVTS.MVTDEBIT) - SUM(MVTS.MVTCREDIT) AS Somme '+
          'FROM     CLIENTS '+
          '         INNER JOIN MVTS '+
          '           ON CLIENTS.CLICODE = MVTS.MVTCOMPTE '+
          'WHERE    MVTS.MVTDATEDOC > :dateParam '+
          'GROUP BY CLIENTS.CLINOM1');
  ParamByName('dateParam').AsDateTime := DateTimePicker3.DateTime;
[...]

Merci Magnus de ton aide

Code:

1
2
3
4
5
6
7
8
9
10
11
With Query1 do
begin
  Close;
  SQL.Clear;
  sql.Add('SELECT CLIENTS.CLINOM1 AS CLIENTS , Sum(MVTS.MVTDEBIT) - Sum(MVTS.MVTCREDIT) as Somme   ');
  SQL.Add('FROM CLIENTS INNER JOIN MVTS ON CLIENTS.CLICODE = MVTS.MVTCOMPTE ');
  SQL.Add('WHERE  MVTS.MVTDATEDOC > : dateParam   ' );
  SQL.Add('GROUP BY CLIENTS.CLINOM1  ');
  ParamByName('dateParam').AsDateTime := DateTimePicker3.DateTime;
 Open;
end;

Il plante en me disant que dateParam n'est pas trouvé !

pourtant je le déclare !

24/08/2005, 17h20
Magnus

Il n'y a pas d'espace entre : et le nom du champ paramétré donc

Code:

:dateParam

et non pas

Code:

: dateParam

Si tu veux en savoir plus fais des recherches sur les forums sur les requêtes paramétrées.