[jhonny]

Bien, entonces solo basta con que coloques tu codigo en el OnCalcFields del Dataset:

Código Delphi [-]
 
var
 antiguedad : integer;
begin
  try
    if not varisnull(dm.TbEmpleadosFechadeNacimiento.value) and (dm.TbEmpleadosFechadeNacimiento.value <> 0) then
    begin
      //cálculo de la antigüedad de una variedad
      antiguedad := trunc (trunc (date - dm.TbEmpleadosFechadeNacimiento.value) / 365);
      dm.TbEmpleados.Edit;
      dm.TbEmpleadosCalculaEdad.value := antiguedad;
    end;
  except
    //raise;  no se muetra el error ya que es un campo calculado
  end;
end;