TClientDataSet追加字段问题(50)

我用select 语句查出了4个字段放在TClientDataSet数据集中，由于有个字段是字典代码，因此我想在这个数据集中追加一个字段，用于存放字段名称，select a,b,c,d from table_A 查出的数据类型为OleVariant，放在QryData，之后，TClientDataSet1.data:=QryData;现在我要增加一个e字段，使TClientDataSet1包含5个字段，TClientDataSet1.FieldDefs.Add('e',ftstring,90);TClientDataSet1.CreateDataSet;TClientDataSet1.Open;可报错说找不到字段‘e'，请教网友如何解决？

试了一下，先把query的字段加到TClientDataSet1;然后追加TClientDataSet1.FieldDefs.Add('e',ftstring,90);然后赋值TClientDataSet1.data:=QryData;ok

'试了一下，先把query的字段加到TClientDataSet1;'什么意思？

TClientDataSet1.Open;这个时候虽然你再字段定义中加了字段‘e’但是数据中并没有'e'这个字段所以会报这个错误了。可以在cds中定义‘e’字段为Calculate字段；也可以在select语句中增加 as 一个‘e’字段出来。

这是一个办法，有没有更好的办法?