Delphi - Insert para Fechas

Como puedo insertar una fecha a una tabla .DBF con SQL

Lo he intentado asi:

Label17.Caption:=DateToStr(DateTimePicker1.DateTime);
Query1.SQL.Clear;
Query1.SQL.Add('INSERT INTO Facturas (FECHA) ');
Query1.SQL.Add('VALUES ("' + Label7.Caption + ' ")');
Query1.ExecSQL;

Para otros tipos de datos, no tengo ningun problema.

Que le puedo cambiar, que esta mal de la instruccion.

Intenta con este codigo, ya que veo que estas intentanto enviar el dato a la parte del values de la sentencia de insert y no es correcto hacerl asi en el query de delphi, lo unico que tienes que hacer es pasarle el parametro a traves de la sentencia parambyname.
with Query1 do
Begin
Close;
Label17.Caption:=DateToStr(DateTimePicker1.DateTime);
SQL.Clear;
SQL.Add('INSERT INTO Facturas (FECHA) ');
SQL.Add('VALUES ( :Fecha)');
parambyname('Fecha).value:=Label1.caption;
Query1.ExecSQL;
end;

OK, ya probe hacerlo como me dices, y cuando grabo los datos se detiene la aplicacion y me manda el mensaje

'Type mismatch in expression'

Y ya no guarda nada

La forma más "universal" de pasar parámetros de tipo fecha a las consultas es usando la propiedad AsDate. Por ejemplo:

ParamByName('Fecha').AsDate := Date;
ParamByName('Fecha').AsDate := EncodeDate(2003,2,18); // 18/2/2003

En el ejemplo anterior, en vez de

parambyname('Fecha).value:=Label1.caption;

prueba de esta otra manera:

ParamByName('Fecha').AsDate := StrToDate(Label1.Caption);

Espero que te sirva.

Ernesto D'Spirito
http://www.latiumsoftware.com/es/index.php