TClientdataset 动态平添列

TClientdataset 动态添加列
我有一个clientdataset,在active之后，我想再添加几列

    mTitle := CDSTmp.fieldByName('TITLE').AsString;
    mStatus := CDSTmp.fieldByName('STATUS').AsString;
    mField := TStringField.Create(nil);
    mField.FieldName := mTitle ;
    cdsMain.Fields.Add(mField);

这样添加之后，dbgrid 上面没有显示我新添加的列，为什么呢？？

有什么别的方法么？
[解决办法]
active之后,不能动态增加列！

因为不知道你的真实需求，不好继续做建议。