如何在动态数据集（ADOQuery）中增加计算字段？

Question

ADOQuery的SQL.Text是动态传递过来的（即数据集的列数不固定）；
问：
  现在想在ADOQuery数据集中动态添加一个计算字段“单位”,字符类型，怎么添加？
我试了两种方法，都不行,请各位指点一下：
1、
  temField:TStringField;  temField:=TStringField.Create(Application);
  temField.Name:='aqrMasterTest';
  temField.FieldName:='单位';
  temField.SetFieldType(ftString);
  temField.FieldKind:=fkCalculated;
  temField.DataSet:=aqrMaster;
  说明：增加成功，但是其他字段找不到了，数据集中就剩下一个“单位”字段了；
2、
  temField:TField
  temField:= TField.Create(Application);
  temField.FieldName:='单位';
  temField.FieldKind := fkCalculated;
  aqrMaster.Fields.Add(temField);
  说明：增加是出错，出错信息:"aqrMaster:Field'单位' cannot be calculated or lookup field"最后：
  我搞了一个下午，动态增加字段没有成功，请各位高手指点一下？？？？非常着急。

Answer 1

ADOQuery.SQL.Text传过来后，把他修改一下
改成:select *,单位 from ....