listview显示数据

Question

listview如何显示多列数据

Answer 1

一个简单的例子：ListView1.ViewStyle 要设置成 vsReport;procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
  itm: TListItem;
begin
  for i := 1 to 3 do
    with ListView1.Columns.Add do
    begin
      Caption := 'Column' + IntToStr(i);
      Width := 100;
    end;
  ListView1.Clear;
  itm := ListView1.Items.Add;
  itm.Caption := 'item1 column1';
  itm.SubItems.Add('item1 column2');
  itm.SubItems.Add('item1 column3');
  ListView1.ViewStyle := vsReport;
end;

Answer 2

先编辑listview的Columns
然后:
var
 item:TListItem;
begin
...
item:=mylistview.Items.Add;
//item.ImageIndex:=2;
item.SubItems.Add('aaa');
item.SubItems.Add('bbb');
...
end