对一个数据集里的字段进行修改，并保存到数据库里

 

 

保存的时候，想对一个已存在的数据集里的字段进行修改，并保存到数据库里，则用以下方法很有效果：

 

 

  if not (CDS2.State in [dsinsert,dsedit]) then
  begin

    with cds2 do
    begin
      DisableControls;
      First;
      while not Eof do
      begin
        Edit;
        FieldByName('AgentNo').Value := cxDBTextEdit5.Text;             //--渠道单号
        FieldByName('StockTempBillNo').Value := cxDBTextEdit1.Text;     //-临时托运单号
        Post;
        Next;
      end;
      EnableControls;
    end;

  end;
  dm.PutDataPack('select * from  bill_tab where 1=2 ',CDS2);