实际执行时怎么老出错阿(15分)

procedure TForm3.FlatButton23Click(Sender: TObject);//下一步按钮，存入输入的内容
begin
adoTable1.edit;
adoTable1.fieldbyName('ajmc').value := flatdbEdit1.text;
adoTable1.fieldbyName('fasj').value := flatdbEdit2.text;
adoTable1.fieldbyName('fadq').value := flatdbEdit3.text;
adoTable1.fieldbyName('ajlb').value := flatDBComboBox1.text;
adoTable1.fieldbyName('ajxz').value := flatdbEdit4.text;
adoTable1.fieldbyName('zasd').value := flatdbEdit5.text;
adoTable1.fieldbyName('zagj').value := flatdbEdit6.text;
adoTable1.fieldbyName('qt').value := flatdbEdit7.text;
adoTable1.fieldbyName('zfxm').value := flatdbEdit8.text;
AdoTable1.Post;
AdoTable1.insert;
pagecontrol3.activepage:=tabsheet14;
end;

procedure TForm3.FlatButton27Click(Sender: TObject);、、上一步按钮，回原来的重新编辑
begin
AdoTable1.delete;
pagecontrol3.activepage:=tabsheet13;
end;
实际执行时怎么老出错阿！我是用ａｃｃｅｓｓ，利用时间为编号，即编号默认值为ｎｏｗ，
想输入完后，再建立一个新的给后来的作准备。如果想修改前面的，则删掉这个新建立的。
哪儿有问题？？？？

你前面的adotable.edit是修改呀，如果是增加直接用
adotable.append;
...
adotable.post;//就行了。为什么修改以后再增加记录。

AdoTable1.Post;
AdoTable1.insert;
pagecontrol3.activepage:=tabsheet14;

post 之后再insert 干吗？ 不用吧～

我的意思是当我一个按钮时，ｅｄｉｔ中的内容存入数据库中，同时ｅｄｉｔ中内容刷新，再输入内容，再按这个钮，再存入数据库中。

也相当如：有一个上一步和下一步两个按钮，我输入的内容如果有误，可以上一步去改正，下一步继续。
可是当输入完，再重新输入第二组数据时，用到ｉｎｓｅｒｔ，怎么写？

to wangxinf1在下面一段代码中，你不能用
procedure TForm3.FlatButton27Click(Sender: TObject);、、上一步按钮，回原来的重新编辑
begin
AdoTable1.delete;
pagecontrol3.activepage:=tabsheet13;
end;
应该用
adotable1.cancel;
pagecontrol3.activepage:=tabsheet13;
只有用撤消才可，因为你增加一条记录，还没提交到数据库而又要取消该操作时，
用adotable1.cancel撤消你的操作，不能用AdoTable1.delete;

如果在点下一步按钮后发现先前的一条记录输入错了，
可用设计按上一步，找到那一条记录，修改它
要输入每二组数据，可
adotable1.insert;
adotable1.fieldbyname('..').value:=edit1.text;
....
adotable1.post;
////////////////
要注意：adoTable1.edit是编辑当前记录，不是插入
　

多人接受答案了。