在一個繼承TfrmCustomBGB的Form中進行編輯

在一個繼承TfrmCustomBGB的Form中進行編輯

一. 窗體部份
1.屬性部份
    cxGrid1DBBandedTableView1.OptionsData.Editing := True; //設為可以改
    cxGrid1DBBandedTableView1.OptionsSelection.InvertSelect := False; //取消反色

特別注意:
    SmartBrowser1.MultRecSelect 這項不能設為 True, 否則不能修改.

2.代碼部份
    procedure TfrmPRecList.FormShow(Sender: TObject);
    begin
      inherited;
      cxGrid1DBBandedTableView1.OptionsData.Editing := True;       //設為True, 否則不行
      //可以編輯字段的Style
      colaInStoreName.Styles.Content := frmCustomResource.cxStyle49;
      colaReceiveState.Styles.Content := frmCustomResource.cxStyle49;
    end;

    //未Post的要進行Post
    procedure TfrmPRecList.PostMasterDataSet;
    begin
      if MasterDataSet.State in [dsEdit] then
        MasterDataSet.Post;
    end;

    procedure TfrmPRecList.cxGrid1Exit(Sender: TObject);
    begin
      inherited;
      PostMasterDataSet;
    end;

    procedure TfrmPRecList.FormClose(Sender: TObject; var Action: TCloseAction);
    begin
      PostMasterDataSet;
     inherited;
   end;

二. DataModule 部份
    procedure TDataPRecList.PRecListAfterPost(DataSet: TDataSet);
    begin
      inherited;
     TSmartDataSet(DataSet).ApplyUpdates(0);
   end;