1.delphi 中listview的源码用法？

delphi 中listview的用法？

       首先将控件的ViewStyle属性设置成vsReport，再设置其Columns属性(添加4个列名)

       添加一行：

       var

        tmpItem: TListItem;

       begin

        tmpItem := ListView1.Items.Add;

        tmpItem.Caption := '1'; //第1行第1列

        tmpItem.SubItems.Add('2');//第1行第2列

        tmpItem.SubItems.Add('3');//第1行第3列

        tmpITem.SubItems.Add('4');//第1行第4列

       end;

       删除一行：

       ListView1.Items[0].Delete; //删除第1行

       修改一行：

       var

        tmpItem: TListItem;

       begin

        tmpItem := ListView1.Items[0];//得到第一行对象

        tmpItem.Caption := '';//修改第1行第1列

        tmpItem.SubItems[0] := '';//修改第1行第2列

        tmpItem.SubItems[1] := '';//修改第1行第3列

       end;