[Nuria]

Creo que te complicas mucho la vida, yo simplemente haría esto:

Código Delphi [-]
 Tabla.FieldByName('NombredelCampoFecha').AsDate:= TDateTimePicker.Date;

Espero que te sirva... lo he puesto todo de memoría (no tengo el delphi a mano).