請教各位前輩.. ClientDataSet在修改完數筆資料後,執行update之前,有沒有辦法 知道哪幾筆資料曾經做過修改?

Hi sunny217,    

procedure TForm1.Button2Click(Sender: TObject);
begin
  ClientDataSet1.First;
  while not ClientDataSet1.Eof do
    begin
      case ClientDataSet1.UpdateStatus of
        usUnmodified : Showmessage(VarToStr(ClientDataSet1.FieldValues['id'])   ' - Unmodified');
        usModified : Showmessage(VarToStr(ClientDataSet1.FieldValues['id'])   ' - Modified');
        usInserted : Showmessage(VarToStr(ClientDataSet1.FieldValues['id'])   ' - Inserted');
        usDeleted : Showmessage(VarToStr(ClientDataSet1.FieldValues['id'])   ' - Deleted');
      end;
      ClientDataSet1.Next;
    end;
end;

---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

你可以參考李維高效率資料庫的書,上面有介紹 可以應用clientdataset.delta 了解異動的資料    

引言: 請教各位前輩.. ClientDataSet在修改完數筆資料後,執行update之前,有沒有辦法 知道哪幾筆資料曾經做過修改?

很抱歉,我應該沒把問題描述清楚... 我的ClientDataSet是用來當作暫存的Table編輯資料使用, 所以並沒有設定providerName Fishman前輩的方法抓出來的updatestatus都是inserted的狀態 不曉得是否和provider有關,或者有什麼屬性需要設定? 至於delphiwww前輩講的那本書...ㄟ...目前手邊沒有>_< 這陣子試驗透過ClientDataSet做資料編輯後,才將資料 透過Query元件寫入資料庫,覺得好難控制ClientDataSet到TQuery這段(因為 欄位格式不太一樣,需處理過才行) 目前只有新增時能批次寫入資料庫,修改與刪除資料還做不到 (新增時透過Query.AppendRecord的方式全部放入Query後,再ApplyUpdate, 但是修改與刪除不曉得要怎麼做,雖然有使用UpdateSQL,可是一直出現錯誤, 不曉得有沒有前輩使用類似的方法過??)

Hi sunny217,    建議你直接在建立一個 DataSetProvider，關聯如下 TTable(TQuery)-->DataSetProvider-->ClientDataSet    再運用 ClientDataSet.ApplyUpdate(-1) 將暫存資料批次寫入資料庫    以下有一篇文章關於 ClientDataSet 你可以參考看看    http://delphi.ktop.com.tw/topic.php?topic_id=51084 ---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman