麻烦哪位帮我解决一下这问题??

Question

各位大侠好,我以下的这个代码好像没有错,但为什么会出现这些错误呢?
能帮我改一下吗?
procedure TForm_chaxun.BitBtn11Click(Sender: TObject);
begin
if radiobutton7.Checked=true then
with dm.ADOTable_huiyuanka do
begin
dm.ADOTable_huiyuanka.Edit;
dm.ADOTable_huiyuanka.IndexName:='kh';
dm.ADOTable_huiyuanka.Open;
setkey; 
dm.ADOTable_huiyuanka.FieldByName('kh').AsString:=edit4.Text;
gotonearest;
end;
出现下面的错误提示
[Error] Unit_chaxun.pas(325): Undeclared identifier: 'setkey'
[Error] Unit_chaxun.pas(328): Undeclared identifier: 'gotonearest'
[Fatal Error] project_server.dpr(15): Could not compile used unit 'Unit_chaxun.pas'

Answer 1

它说setkey和gotonearest这两个标识符没有声明。

Answer 2

不知道setkey和gotonearest要实现什么功能，叫人怎么改。
如果想要通过编译的话，就把那两行删掉。:)

Answer 3

dm.ADOTable_huiyuanka.setkey;
dm.ADOTable_huiyuanka.FieldByName('kh');
你这样试下看。