void __fastcall TForm1::createField()
{
ClientDataSet1->Close();
//for(int i = 0 ;i < ClientDataSet1->Fields->Count - 1;i++)
// ClientDataSet1->Fields->Fields[0]->Free();//释放所有的静态字段
ClientDataSet1->Fields->Clear();
// for(int i = 0 ;i < ClientDataSet1->FieldDefs->Count - 1;i++)
// ClientDataSet1->FieldDefs->Items[i]->Free();
ClientDataSet1->FieldDefs->Clear();
ClientDataSet1->Open();
ClientDataSet1->Close();
for(int i = 0 ;i < ClientDataSet1->Fields->Count - 1;i++)
ClientDataSet1->Fields->Fields[0]->Free();//释放所有的静态字段
for(int i = 0 ;i < ClientDataSet1->FieldDefs->Count - 1;i++)
ClientDataSet1->FieldDefs->Items[i]->CreateField(ClientDataSet1);
TBooleanField *NewField;
NewField = new TBooleanField(ClientDataSet1);
NewField->FieldName="SelectMe";
NewField->DisplayLabel = "选择";
NewField->FieldKind=fkInternalCalc;
NewField->DataSet=ClientDataSet1;
NewField->Index = 0;
ClientDataSet1->Open();
}