Discussion :

[James64]

G le code suivant servant à compter les doublons sur le champ Noticket à l'intérieur d'un filtre de dates :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
close;
              SQL.clear;
              SQL.Add('SELECT NoTicket, COUNT(*) AS nombre FROM ');
              SQL.Add(QuotedStr(form1.chemin0+'\Sortick.DB'));
              SQL.Add(' WHERE DatPai>=:ParamDate1');
              SQL.Add(' AND DatEnt<=:ParamDate2');
              SQL.Add(' GROUP BY NoTicket HAVING COUNT(*) > 1');
              ParamCheck := True;
              Params.ParamByName('ParamDate1').AsDateTime := StrToDateTime(Date1+' '+Time1);
              Params.ParamByName('ParamDate2').AsDateTime := StrToDateTime(Date2+' '+Time2);
              Open;

Ca marche bien !
Ma question est : comment récupérer la valeur "nombre" dans le code delphi ?

Merci à vous car je débute..

[e-ric]

Salut

Comme dans tout ensemble de données :

Code :

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

1
2
3
 
   Open;
   Nombre := FieldByName('Nombre').AsInteger;

Nombre étant déclarée comme integer, c'est un exemple.
Bonne suite...

Par contre : quel composant utilises-tu ? TQuery?

cdlt

e-ric

[James64]

oui