Por si a alguien le sirve de ayuda, lo he resuelto con el siguiente procedure:
//al crearse un nuevo registro, en la tabla Anota
procedure TFrmDModule.TbAnotaNewRecord(DataSet: TDataSet);
begin
//le asignamos el valor de la fecha de hoy al campo FECHA de la tabla Anota
TbAnotaFECHA.Value := date;
//le asignamos el nombre del usuario activo en el campo descripcion, (quien está haciendo el comentario)
TbAnotaALUDESCRIPCION.Value:= TbUSersUSUARIO.Value;
//Guardamos el cambio en el registro antes de dejar que comiencen a escribir en el registor
TbAnota.Post;
//volvemos a editar el registro, para que se pueda escribir en el
TbAnota.Edit;
end;
Como el problema lo daba sólo la primera vez que guardamos el registro, cuando acababamos de insertarle datos, y una vez que hemos guardado el registro, no nos vuelve a dar el problema, con esto queda eso solucionado.
Un saludo a todos.
Virginia
__________________
Sonrie al mundo, y el mundo te sonreirá :)
|