casi estoy seguro que podria ser:
Código Delphi
[-]
form6.query1.sql.add('where fecha =' + QuotedStr(DateToStr(DateTimePicker1.Date)));
lo que hace la funcion QuotedStr es poner comilla simple en la fecha, para que quedara algo asi:
Where Fecha = '23/04/2007'