数据库查询到的值放入listview中解决思路

数据库查询到的值放入listview中
怎样将从数据库中查询得到的值放入listview的控件中啊？

[解决办法]
得到adoquery后，遍历，填充到Listview，不能直接绑定

Delphi(Pascal) code

var  item:TlistItem;begin  while not ADOQuery1.Eof do  begin    item := ListView1.Items.Add;    item.Caption := ADOQuery1.FieldByName('xx').AsString;    item.SubItems.Add(ADOQuery1.FieldByName('xx').AsString);    ADOQuery1.Next;  end;end;
[解决办法]
Delphi(Pascal) code
var  D: TDataSet;begin  D := ADoTable1;  D.Open;  D.First;  while not D.Eof do  begin    with ListView1.Items.Add do    begin      Caption := D.Fields[0].AsString;      with SubItems do      begin        Add(D.Fields[1].AsString);        Add(D.Fields[2].AsString)      end    end;    D.Next  end;end;