Problema con sintaxis.

[zvf]

Hola a todos!!!

Necesito ejecutar esta consulta, pero al correrlo me manda un error en tiempo de ejecución, es una excepcion. Estoy utilizando componentes Zeos para hacerlo. Mi codigo es este, no se si tenga mal la sintaxis de la consulta, pero es que yo no he realizado consultas con AND, tal vez ahi este el error.

Código Delphi [-]
procedure TForm1.BBorrarCortesClick(Sender: TObject);
var consulta, fecha: string;
begin
 fecha:= '2007'+'-'+'01'+'-'+'10';
 ZQ.SQL.Clear;
 consulta:= 'DELETE * FROM `gastos` WHERE `TDA_ID_GTO` =14 AND `fecha_pres_gasto` ='+ #39 + fecha + #39 +';';
 ZQ.SQL.Add(consulta);
 ZQ.ExecSQL;
end;

El error que me marca es el siguiente:

SQL Error: Bad handshake

GRACIAS DE ANTEMANO POR SU AYUDA