请求高手，不明白的错误!

Question

access作数据库
以下代码 try
 datamodule1.ADOTable1.Active :=true;
 datamodule1.ADOTable1.Append ;
 datamodule1.ADOTable1.FieldByName('书名').AsString :=edit1.Text ;
 datamodule1.ADOTable1.Post;
 showmessage('添加成功!');
 except
   datamodule1.ADOTable1.Cancel ;
   showmessage('检查是否添加正确!');
   end;错在哪
project mainsysp.exe raised exception class EOleException with message '由于将在索引、
主关键字、或关系中创建重复的值，请求对表的改变没有成功。改变该字段中的或包含重复数据的字
段中的数据，删除索引或重新定义索引以允许重复的值并再试一次。'，Process stopped.Use
Step or Run to continue,

Answer 1

try
 datamodule1.ADOTable1.Active :=true;
 datamodule1.ADOTable1.Append ;
 datamodule1.ADOTable1.Edit;//这里加一句
 datamodule1.ADOTable1.FieldByName('书名').AsString :=edit1.Text ;
 datamodule1.ADOTable1.Post;
 showmessage('添加成功!');
 except
   datamodule1.ADOTable1.Cancel ;
   showmessage('检查是否添加正确!');
   end;

Answer 2

书名也没有建索引呀
除编号外，其他的都没索引,
在access里必须要一个主键呀

Answer 3

重新放一个adotable1 上去,只设置他的tableName,不改变其他任何属性.