如何利用locate函数将DBGrid中的某条记录变蓝？

Question

各位，我设计了两个窗口：
---Form1:上面放置了edit1和button1两个组件；
---Form2:上面放置了DBGrid1（已经和数据库连接好）。我的button1的代码如下：
...
if Not Locate('编号',edit1.text,[]); then
begin
  Showmessage('...');
  Form1.show;
  Form1.Edit1.text:='';
end
else
  Form2.showModal;
...以前这段代码能够作到的是，显示Form2窗口，并且小黑三角定位在我要找的记录左侧（记录并没有变蓝）。但是现在小黑三角只是指向首条记录。
我记得我没有做什么改动呀？请问这是为什么？

Answer 1

"if Not Locate('编号',edit1.text,[]);"尾部多了个分号阿

Answer 2

楼上，如果没有找到记录，应该showmessage，不过楼主的意思好象没有showmessage。哎？button1不是在form1上的吗？你的form1怎么又show了一下？

Answer 3

sabre(沙漠军刀),我的button1的确在form1上，那一句show多余了。samcrm(阿靖) ，我的意思是找到了记录，小黑三角仍指向第一条记录。