Bonjour à tous,
Je vous présente mon morceau de programme pascal objet:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
     procedure TForm1.FormActivate(Sender: TObject);
            var ref:Tdate;
     begin
            ref:=IncMonth(date,-11);
            dm.Query.ParamByName('ddc').AsDate:=ref;
            dm.Query.Open;
     end;
et dans le Query j'ai :
Code SQL : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
 
     select codecl, max(datecom) as date_com
     from commander
     group by codecl
     having max(datecom) <=:ddc
Le problème c'est qu'à l'exécution il m'affiche le message suivant:

"Format de date invalide (null)" je ne comprend pas pourquoi.
Je vous remercie de m'éclairer sur cette erreur.