Código Delphi
[-]
Query1.SQL.Clear;
Query1.Close;
Query1.SQL.Text:='SELECT * FROM TOTALES WHERE FEEMLI =:fecha';
Query1.ParamByName('fecha').Value:= Trunc(DateTimePicker1.DateTime);
Query1.Open;
Veo que le das valores a 2 parámetros que se llaman fecha, pero en el SQL solo añades un parámetro.
De todas formas, puedes que no hayas puesto todo el sql completo para simplificar, creo que el truco está en Trunc, para dar la fecha y quitar la hora.
Si usas FormatDateTime, estas asignando una fecha con tipo de datos String (pueden venir problemas despues).
Si Usas AsDateTime, pues tambien está recibiendo la hora (no sé exactametne como trabaja SQL SERVER, sería cuestion de hacer un ShowMessage despues de abrir la consulta para ver el sql que se ha usado) para ver si añade a la fecha 0:00:00.000
.
Saludos