菜鸟问题7---请介绍一下listview控件的基本属性和使用方法

Question

例如：1、如何添加各个字段的标题？2、如何添加Item 3、如何得到当前选中行？
...

Answer 1

var
listitem:Tlistitem;
begin
listitem:=listview1.items.add;
listitem.Caption := '12345';
listitem.SubItems.Add('23456');
end;

Answer 2

re (3、如何得到当前选中行？)procedure TForm1.ListView1SelectItem(Sender: TObject; Item: TListItem;
  Selected: Boolean);
begin
  if Selected then Caption := Item.SubItems[Item.SubItems.count-1];
end;

Answer 3

我想在listview中加两列数据，name和age,如何让listview中出现类似于vc中的headctrl，可以显示name和age这两个标题，并且如何添加多条纪录？

Answer 4

TWidth怎么用？如何转成整形？
我想让一个column的width等于listview的宽度的一半，
但listview1.columns[0].width返回Twidth型
而listview1.width返回整形，如何让他们一致？