delphi listview与数据库的问题!

[xiaoyu8308]

用一个listview与数据库产生如下效果.

listview 表头已经设置好.
比如:
姓名 性别 出生年月

数据库有如下数据:
张三 男 2000-10-10
李四 女 2000-08-09

我想让listview通过查询,显示数据库中记录.

我写的只能讲所有的记录都在第一行显示,效果如下:
姓名 性别 出生年月
张三
男
2000-10-10
李四
.
.
.

请问,正确的应该怎么写?

[zhangl_cn]

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;