Salut et bonjour à tous.

Voila, j'ai un problème concernant les dates dans une requette SelectSQL d'un IBDataset.
Je précise : je veux que mon IBDataset affiche les champs de type "Date" dont la date est inférieur à une date données. Voici le code utilisé :

Code delphi : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var
  s_date :TDateTime;
 
begin
 
  s := 'Select * From "CLIENTS"';
  s := s + ' Where DATE_VISITE <= ' + DateToStr(s_date);
  s := s + ' Order By DATE_VISITE';
 
  with DataClients.ibdClients do
  begin
    Close;
    SelectSQL.Clear;
    SelectSQL.Add(s);
    Open;
  end;
 
end;

ibdClients est le nom de mon IBDataset.

et un grand merci à vous !