利用Table控件进行查询，结果有多条记录怎么处理？

Question

目前只能查到一个记录，怎么把查到的记录全部用高亮显示呢?
或者逐个显示也行
程序如下
if r1.Checked=True then
      begin
      Table1.IndexFieldNames:='姓名';
      Table1.EditKey;
      Table1.FieldByName('姓名').AsInteger:=StrToInt(Edit12.text);
      IF table1.gotoKey<>true then
        begin
        Application.MessageBox('没有查到该记录','提示信息',MB_OK);
        end;
      end;

Answer 1

可是我用的是Table呀，拜托详细点把

Answer 2

查询应该用ADOQUERY
with adoquery1 do 
  begin
    close;
    SQL.Clear;
    SQL.Add('select * from 表 where 姓名=:xName');
    Parameters[0].value:=某变量或某Edit中的值;
    Open;
    if IsEmpty then
       Application.MessageBox('没有查到该记录','提示信息',MB_OK)
    else
       //找到了记录，再进行相应的处理
  end;