delphi listview与数据库的问题!

Question

用一个listview与数据库产生如下效果.listview 表头已经设置好.
比如:
姓名  性别   出生年月数据库有如下数据:
张三   男    2000-10-10
李四   女    2000-08-09我想让listview通过查询,显示数据库中记录.我写的只能讲所有的记录都在第一行显示,效果如下:
姓名   性别   出生年月
张三
男
2000-10-10
李四
  .
  .
  .请问,正确的应该怎么写?

Answer 1

var
  Item:TListItem;
begin
  wile not DataSet.Eof do
  beign
    Item:=ListView1.Items.Add;
    Item.Caption:=DataSet.FieldByName('姓名').AsString;
    Item.SubItems.Add(DataSet.FieldByName('性别').AsString;
    Item.SubItems.Add(DataSet.FieldByName('出生年月').AsString;
    DataSet.Next;
  end;
end;