操作数据库的问题 ( 积分: 100 )

请问各位大侠
谁能提供一点将SQL数据库中一个表的数据显示在LISTVIEW中的代码啊，急求

网络上多的要死
太懒了吧

Query1.CLose;
Query1.SQL.Clear;
Query1.SQL.Add('Select * From sp where sp_sph like ''s%'' ');
Query1.Open;

query1.first;
while not query1.eof do
begin

ListView.item.add(query1.fieldbyname(sp_sph).Asstring);
query1.next;

end;


Query1.CLose;
Query1.SQL.Clear;
Query1.SQL.Add('Select * From sp where sp_sph like ''s%'' ');
Query1.Open;

query1.first;
ListView.clear;

while not query1.eof do
begin
ListView.item.add(query1.fieldbyname(sp_sph).Asstring);
query1.next;
end;

Query1.CLose;
Query1.SQL.Clear;
Query1.SQL.Add('Select * From sp where sp_sph like ''s%'' ');
Query1.Open;
query1.first;
ListView.clear;
while not query1.eof do
begin

ListView.item.add(query1.fieldbyname(sp_sph).Asstring);
query1.next;

end;