【求教】关于向数据库表尾加入一条记录(ADOTable)

Question

说明：ms－sql2000＋d7  ADOTable1与DBEdit1－4连接，DBEdit1－4的DataField属性分别为表的各个列【4列分别为为：id（设置为了主键，并自动加1），name，sex，note】我想向表尾添加一条记录用ADOTable1.Append;语句为什么DBEdit1的内容没有自动加1而是为空？怎么让DBEdit1的内容为表尾的id＋1，其他各个DBEdit都为空以供编辑？求大哥帮小弟解决，小弟在线等！

Answer 1

纠正：说明：DBEdit1－4与ADOTable1连接，ADOTable1与表连接

Answer 2

好像不行，因为append表示想数据库添加一条空记录，在post后，数据库中才会有 实际的数据！

Answer 3

Var i :Integer;
在“新增”按钮下写：
Begin
 i:=ADOTable.FieldbYname('id').AsInteger;
 ADOTable.Append;
End;然后在TADOTable的OnNewRecord事件中写如下代码：
DBEdit1.Text := i +  1;