[luisgutierrezb]

Al Gonzalez, Era afirmación...

por lo que veo es Lazarus y ahi si casi no lo eh usado, sin embargo tal vez te pueda servir este codigo:

Código Delphi [-]
FieldTEmp := TStringField.Create(dataset); 
   with FieldTEmp do 
   begin 
        FieldName := 'NewField'; 
        FieldKind := fkLookup; 
        KeyFields := 'character_family'; 
        LookupDataSet := clansDataSet; 
        LookupKeyFields := 'family_id'; 
        LookupResultField := 'family_group'; 
        DataSet := self.dataSet; 
   end; 
   dataSet.FieldDefs.Add(FieldTemp.FieldName, ftString, 50, false); 
   dataSet.Fields.Add(FieldTEmp);

este codigo es para crear un campo en tiempo de ejecucion, es de tipo lookup pero cambiando las propiedades lo puedes hacer calculado, espero que te sirva