Delphi - select no funciona

por que no me devuelve el total del query.
el dbgrid debuerbe los resultados correctos
pero la suma ('total') no me la devuelve que es lo que falla

dbgrid1.DataSource:=datasource4;
table4.Filtered:=false;
Table4.Filter := 'articulo ='+''''+ edit2.Text +''''+'and maquina ='+''''+ edit1.Text +''''+'and fecha ='+''''+ edit3.Text +'''' ;
table4.Filtered:=true;
if query4.Active then
query4.Close;
query4.SQL.Text := 'SELECT SUM(recaudado) AS TOTAL '
+ 'FROM maquina1 '
+ 'WHERE articulo ='+''''+ edit2.Text +''''+'and maquina ='+''''+ edit1.Text +''''+'and fecha ='+''''+ edit3.Text +'''';
query4.Open;
ShowMessage('la recaudacion de la maquina ' + edit1.Text + ' es: '+ query4.FieldByName('TOTAL').asString + ' € '+edit3.Text);

si se quita esto funciona (+'and fecha ='+''''+ edit3.Text +''') por que
gracias

Ejecuta tu select en algun administrador, si ahi funciona es porque funciona, si funciona en el administrador es que estas escribiendo mal tu sentencia en el programa, muestranos tu sentencia sql fuera de delphi.

el problemas es que la db me devuelve la fecha en formato (mm/dd/yyyy)
y cuando se guardan en la db van en este formato (dd//mm/yyyy) con lo que no puede coincidir las fechas .
ay alguna manera para lograr que las dos fechas sean iguales
gracias

e solucionado el problema con esto : ShortDateFormat := 'mm/dd/yyyy';
y adocto el sistema ingles de fecha aunque no me gusta
gracias