Crear Campo Calculado

[yusnerqui]

Saludos amigos.
Como creo un campo calculado sin usar el cuadro de diálogo New Field, probé algo así pero me dá error.

if TablaName = 'Maestro' then
begin
A := TField.Create(Tabla);
A.Calculated :=true;
A.FieldName := 'Edad';
A.SetFieldType(ftBytes);
A.DisplayWidth:= 50;
a.Index := 1;
Tabla.Fields.Add(A);
end;

Es que uso el mismo KadaoTable para varias táblas y a la tabla Maestro de trabajadores necesito calcularle la edad.

Gracias por su ayuda. un saludo