各位高手幫忙看看--數據庫存檔不了

Question

我有一個表test,表中有一個boolean字段flag,我想在給它賦值前先判斷修改者的身份,只有驗證通過了才能寫入.(用的是wwDBGrid和ADOQuery)
我在下面事件中寫下面代碼.結果事件觸發了,但既便驗證通過也存不了.
procedure TDataModule1.QtestFlagSetText(Sender: TField;
  const Text: string);
begin
  if frmmain.comeMan <> qtesttestman.Value then
  begin
    showmessage('sorry,此記錄不是您新增，不能修改');
    abort;
  end;   
end;請問我應如何實現,thanks.

Answer 1

进入时就要求密码，只有通过验证的才可以修改数据。
Form1.Create
begin
DataSource.AutoEdit := false;
end

Answer 2

在Query的BeforeEdit和BeforeInsert事件里写。

Answer 3

Query的BeforeEdit和BeforeInsert事件里写。