BCB6 使用TClientDataset范例

最新推荐文章于 2021-06-15 12:13:30 发布

云魂工作室-AKAI

最新推荐文章于 2021-06-15 12:13:30 发布

阅读量1.4k

点赞数

分类专栏：心路历程 c/c++ C++ Builder

本文链接：https://blog.csdn.net/limuyun/article/details/25876933

版权

心路历程同时被 3 个专栏收录

16 篇文章 0 订阅

订阅专栏

c/c++

14 篇文章 0 订阅

订阅专栏

C++ Builder

7 篇文章 0 订阅

订阅专栏

使用步骤，

1.创建字段

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    this->ClientDataSet1->EmptyDataSet();

     this->ClientDataSet1->Active=True;
    this->ClientDataSet1->Append();
     this->ClientDataSet1->FieldByName("JGBM")->Value="1";
     this->ClientDataSet1->FieldByName("DYBM")->Value="2";
     this->ClientDataSet1->FieldByName("QPBJ")->Value="1";
     this->ClientDataSet1->FieldByName("JGMC")->Value="2";
      this->ClientDataSet1->Append();
          this->ClientDataSet1->FieldByName("JGBM")->Value="1";
     this->ClientDataSet1->FieldByName("DYBM")->Value="2";
     this->ClientDataSet1->FieldByName("QPBJ")->Value="1";
     this->ClientDataSet1->FieldByName("JGMC")->Value="2";
      this->ClientDataSet1->Append();
          this->ClientDataSet1->FieldByName("JGBM")->Value="1";
     this->ClientDataSet1->FieldByName("DYBM")->Value="2";
     this->ClientDataSet1->FieldByName("QPBJ")->Value="1";
     this->ClientDataSet1->FieldByName("JGMC")->Value="2";
      this->ClientDataSet1->Append();
          this->ClientDataSet1->FieldByName("JGBM")->Value="1";
     this->ClientDataSet1->FieldByName("DYBM")->Value="2";
     this->ClientDataSet1->FieldByName("QPBJ")->Value="1";
     this->ClientDataSet1->FieldByName("JGMC")->Value="2";
      this->ClientDataSet1->Append();
          this->ClientDataSet1->FieldByName("JGBM")->Value="1";
     this->ClientDataSet1->FieldByName("DYBM")->Value="2";
     this->ClientDataSet1->FieldByName("QPBJ")->Value="1";
     this->ClientDataSet1->FieldByName("JGMC")->Value="2";
     this->DBGrid1->Refresh();
}
//---------------------------------------------------------------------------


void TForm1::InitClientDataSet()
{
        //TODO: Add your source code here
    //添加CLIENTDATASET控件列
      TFieldDefs *p_cl_Defs=ClientDataSet1->FieldDefs;

    //  ClientDataSet1->FieldDefs->Add("JGBM",ftString,10);


      TFieldDef * p_cl_Def=NULL;

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=10;
      p_cl_Def->Name="JGBM";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=10;
      p_cl_Def->Name="DYBM";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=10;
      p_cl_Def->Name="QPBJ";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=150;
      p_cl_Def->Name="JGMC";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=120;
      p_cl_Def->Name="KXYZ";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=120;
      p_cl_Def->Name="GBYZ";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=120;
      p_cl_Def->Name="ZBYZ";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=120;
      p_cl_Def->Name="YHYZ";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=120;
      p_cl_Def->Name="XBYZ";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=120;
      p_cl_Def->Name="HBYZ";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=120;
      p_cl_Def->Name="HXYZ";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=120;
      p_cl_Def->Name="PJYZX";   /*平均一致性*/

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=10;
      p_cl_Def->Name="HZBZ";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=100;
      p_cl_Def->Name="PMSJGBM";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=200;
      p_cl_Def->Name="GISJGBM";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=10;
      p_cl_Def->Name="CFML";

      p_cl_Def=p_cl_Defs->AddFieldDef();
      p_cl_Def->DataType=ftString;
      p_cl_Def->Size=7;
      p_cl_Def->Name="HZXS";



}
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  InitClientDataSet();
  ClientDataSet1->CreateDataSet();
}

这些步骤，一个都不能少。