帮小弟我看看ADOTable1这个查询错在哪里啊代码简单

帮我看看ADOTable1这个查询错在哪里啊？代码简单
我要查询的是按这个表里面的第一个字段得值来定位
Emp_id       Emp_name
1                 rghgf
2                 wertwer
3                 klkkl
4                 wwwww
5                 eeeee
6                 erererr
我的查询时这样的
Form1-> ADOTable1-> Bof;//首先指针定位到1
int   m;
m=StrToInt(Edit1-> Text)
  if(StrToInt(Form1-> ADOTable1-> FieldByName( "Emp_id ")-> AsString)！=m)
{
        do     {
                          Form1-> ADOTable1-> Next();
                        }   while(Form1-> ADOTable1-> Eof);//直到定位到要查询的Emp_id
      ShowMessage( "查找成功 ")；
      Form1-> ADOTable1-> Bof;//成功之后再次到首位，便于下次查询
         


}

请问高手这种方法为什么出现错误了？有没有别的方法了，能写出代码吗？

[解决办法]
TLocateOptions opt;
ADOTable-> First();
if( ADOTable-> Locate( "Emp_name ", Edit1-> Text, opt) ) ShowMessage( "OK ");
[解决办法]
Form1-> ADOTable1-> First();
AnsiString strmsg= "没有找到！ ";
while(!Form1-> ADOTable1-> Eof)
{
if(Form1-> ADOTable1-> FieldByName( "Emp_id ")-> AsString==Edit1-> Text)
{
strmsg= "查找成功！ ";
break;
}
}
ShowMessage(strmsg);
Form1-> ADOTable1-> First();