基础知识求教！(0分)

1、昨天请教了一个问题，是关于对已存在的数据记录进行判断的，
就时当发现我要保存的这个值数据库中存在时，判断是否覆盖原值，有位老兄告诉了我以下这段程
序，可当我运行时，提示：LOPARTIALKEY未申报。但我认为它一个函数，还要申报吗，请告诉我。


procedure TForm1.BitBtn1Click(Sender: TObject);
BEGIN
TABLE1.ACTIVE:=TRUE;
if table1.locate('姓名',edit1.text,[loPartialKey])=false then///LOPARTIALKEY要申报吗？
begin
table1.append;
table1.fieldbyname('姓名').asstring:=edit1.text;

table1.post;
TABLE1.ACTIVE:=FALSE;
end
else
begin
if application.messagebox('重名，是否覆盖？','error',mb_yesno)=id_yes then
///////