Error al asignar la fecha en la creacion de nuevo registro
 

buenos dias a todos y de antemano gracias por tomarse la molestia de ayudarme
Estoy dando haciendo una forma para dar de altas contratos de ventas a credito
y estoy usando campos anidadosen el ClientDataSet CDScdsContratUnCliente hago lo siguiente

Código Delphi [-]
procedure Tlogicanegocio.cdsContratUnClienteNewRecord(DataSet: TDataSet);
begin
 cdsContratUnClienteFECHA_ALTA.NewValue:=date;
 cdsContratUnClienteHORA_ALTA.NewValue:=time;
end;

utilizo un DBnavigator para generar el contrato nuevo
pero cuando quiere asignar la fecha me genera el siguiente error:
Tiene alguna idea por que ?

Estoy usando delphi 7 enterprise

gracias a todos, ya encontre el error.
se escribe asi

Código Delphi [-]
procedure Tlogicanegocio.cdsContratUnClienteNewRecord(DataSet: TDataSet);
begin
 cdsContratUnClienteFECHA_ALTA.Value:=date;
 cdsContratUnClienteHORA_ALTA.Value:=time;
end;