Campo tipo FECHA en GRID

Hola a todos. Mi duda es la siguiente: donde puede dar el formato y como
para capturar dato tipo fecha; estoy en un grid y cuando quiero grabar me
dice "dato incompatible", ademas, al querer grabar (estoy en modo edicion o
modificar) no me deja y si me crear un registro en blanco. El codigo para
grabar lo editado o modificado es el siguiente:

Case ThisForm.Bot_Agre.Caption = '\<Guardar'
ThisForm.Bot_Agre.Caption = '\<Agregar'
ThisForm.Bot_Edit.Caption = '\<Editar'
Nvo_Saldo1 = ThisForm.TxtSaldo1.Value - C->TotFact
Nvo_Saldo2 = ThisForm.TxtSaldo2.Value - C->TotFact
Select 3
APPEND BLANK
REPLACE No_Obra WITH ThisForm.CmbNo_Obra.Value
Replace Ramo With ThisForm.TxtRamo.Value
Replace Fecha WITH ThisForm.TxtFecha.Value
Replace Factura WITH ThisForm.TxtFacturas.Value
Replace Concepto WITH ThisForm.TxtConcepto.Value
Replace TotFact WITH ThisForm.TxtImporte.Value
Replace Fec_Pag WITH ThisForm.TxtFec_Pago.Value
Replace Saldo1 With Nvo_Saldo1 &&ThisForm.TxtSaldo1.Value -
TotFact
Replace Saldo2 With Nvo_Saldo2
Replace Avance With 100 *
(ThisForm.TxtAutorizado.Value-Nvo_Saldo1)/ThisForm.TxtAutorizado.Value
=TableUpdate(.T.)
ThisForm.GridOff &&Desactivo el Grid


Gracias de antemano