je veux faire une recherche par date dans une BD Interbase2009 en utilisant TIBDataset mais j'y arrive pas; j'ai un messsage d'erreur : conversion error from string "19/02/2009"
voici le code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
procedure TfProvisoire.dtpChange(Sender: TObject);
var sDate, sSql : string;
begin
  sDate := FormatDatetime('dd/mm/yyyy',dtp.Date);
  sSql :='SELECT * FROM POST WHERE DATEIMP = '
          +QuotedStr(sDate)+ ' and TYPEPOST = '
          +QuotedStr('Provisoire')+ ' ORDER BY DATEIMP';
  if rgRech.ItemIndex = 3 then
   begin
     qPost.Active := false;
     qPost.SelectSQL.Clear;
     qPost.SelectSQL.Add(sSql);
      qPost.Active := true;
   end;
end;