在DBGrid裏，當我Insert 一列record 時，輸入完所有資料後，按鍵盤上的↓鍵之後，就會post 了這列record，而DBGrid上的指標也移到下一列record，但可不可以我想在按鍵盤上的↓鍵之後，post之前，做一些validation，如果發現輸入的資料有錯誤，不post 這列record，而DBGrid上的指標也不移到下一列record，即仍然保留在這列record上，直輸入的資料正確無誤後，才可post，各位大哥應樣做?

你可以寫在TTable的BeforePost Event中 參考參考^_^ void __fastcall TForm1::Table1BeforePost(TDataSet *DataSet) { if(MessageDlg("Update Record?", mtConfirmation, TMsgDlgButtons() << mbYes << mbNo, 0) == mrNo) Abort(); } //--------------------------------------------------------------------------- -------------------------- ～天下本無事 庸人自擾之～

引言: 你可以寫在TTable的BeforePost Event中 參考參考^_^ void __fastcall TForm1::Table1BeforePost(TDataSet *DataSet) { if(MessageDlg("Update Record?", mtConfirmation, TMsgDlgButtons() << mbYes << mbNo, 0) == mrNo) Abort(); } //--------------------------------------------------------------------------- -------------------------- ～天下本無事 庸人自擾之～

用這條語句的確可以解決樓頂大大的問題，但是請問如果是在insert或是edit資料行后，按上下移動資料行，出現提示保存，如果選擇了mrNo，也就是取消post，怎樣可以作到取消post后照樣滾動？？？ 請大大告之，謝謝！！！

引言:

引言: 你可以寫在TTable的BeforePost Event中 參考參考^_^ void __fastcall TForm1::Table1BeforePost(TDataSet *DataSet) { if(MessageDlg("Update Record?", mtConfirmation, TMsgDlgButtons() << mbYes << mbNo, 0) == mrNo) begin Abort(); Table1.next; //加入这句就可以在mrNo后继续移动 end; } //--------------------------------------------------------------------------- -------------------------- ～天下本無事 庸人自擾之～

用這條語句的確可以解決樓頂大大的問題，但是請問如果是在insert或是edit資料行后，按上下移動資料行，出現提示保存，如果選擇了mrNo，也就是取消post，怎樣可以作到取消post后照樣滾動？？？ 請大大告之，謝謝！！！

努力，相信会做的更好！ 發表人 - xiaoning79627 於 2003/12/03 10:12:18

用這句語句恢復原值比用abort強多了,因為一旦用了Abort,所有事務全部取消,當然也包括post后面的scroll滾動事件,所以這個方案最好!不知是否合樓頂大大的要求,我是用這個辦法解決了我的應用! procedure TMdiChildFrm.ADOQuery1BeforePost(DataSet: TDataSet); if MessageDlg('你要保存當前的修改嗎?', mtConfirmation, [mbYes, mbNo], 0) = mrNo then begin for i:=0 to dataset.FieldCount-1 do dataset.Fields.Fields[i].Value:= dataset.Fields.Fields[i].CurValue; end; end;