Como usar filtro em campo timestamp

datamodule1.SQLConsCaixa.CommandText:=´select D_H_FIM, NUM_CONTROLE from CONTROLE_CAIXA where cast(CONTROLE_CAIXA.D_H_FIM as date)=:data1 and TERMINAL=:ID_TERMINAL and STATUS=:I_STATUS´;
      datamodule1.SQLConsCaixa.ParamByName(´data1´).AsDate:=datetimepicker1.date;

Filtro :=´TERMINAL=´´´+id_terminal+´´´´;
      Filtro := Filtro + ´ and ´;
      Filtro := Filtro + ´D_H_FIM=´´´ + datetostr(datetimepicker1.date) + ´´´´;
      //o campo D_H_FIM armazena data e hora
      Filtro := Filtro + ´ and ´;
      Filtro := Filtro + ´STATUS=´´´ + ´T´ + ´´´´;
      //dmLocal.cdsCaixa
      dmLocal.cdsCaixa.Active:=true;
      dmLocal.cdsCaixa.Filter:=filtro;
      dmLocal.cdsCaixa.Filtered:=true;