请教,怎么将数据库里的内容读取到listbox里

请问,如何将数据库里的内容读取到listbox里?
例如

编号           姓名         联系方式
1                 张飞         123456
2                 张宇         3333555

adoquery1.SQL.add( 'select   *   from   lx   where   姓名   like   '+ ' "% '+Edit1.Text+ '% " ');

edit1.text   =   张
搜索到张飞和张宇的联系方式
如何将张飞和张宇的名字显示在listbox里。
我不想用DBGrid1显示.

[解决办法]
刚才的写错了，把next方法忘了，现更正如下：
adoquery1.first;
while not adoquery1.eof do
begin
listbox1.items.add(adoquery1.fieldbyname( '姓名 ').asstring);
adoquery1.next;
end;

//--------------------------
adoquery1.recordcount 就可以告诉你它现在有多少条记录。
所以你也可以这样写：
adoquery1.first;
for i := 0 to adoquery1.recordcount-1 do
begin
listbox1.items.add(adoquery1.fieldbyname( '姓名 ').asstring);
adoquery1.next;
end;

但这样写的话，你得多定义一个变量i来循环。不如前面第一个写法简洁。