[delphi-br] Select não funciona

[Rodrigo Brito]

Boa TArde

tenho esse select na qual faz a filtragem dos meus registros para consulta
mas quando vou escolher a data ele não funciona não retorna nenhum 
valor  o resto funciona
no sql o campo data está como datetime



if radiobutton1.Checked then
     if DateTimePicker1.Checked then
           begin
                adoconmovimento.Active := false;
                adoconmovimento.SQL.Clear;
                adoconmovimento.SQL.Add ('select * from  movimento 
a,categoria b,material c,solicitante d where a.codmat = c.codmat and 
a.tipo = ''E''and b.codcat = c.codcat and _a.data = '+ 
datetostr(DateTimePicker1.date) +_ ' and b.nome like 
'+QuotedStr(DBLookupComboBox1.Text+'%')+ ' and c.nome like 
'+QuotedStr(DBLookupComboBox2.Text+'%')+ 'order by a.data');
                adoconmovimento.active := true;

           end

--