ListView当ViewStyle为vsReport时，只能放两列内容吗？

Question

现在只能实现的是：
第一列       第二列      
违章代码     违章说明    
我想实现如下的功能：
第一列       第二列       第三列      第四列
违章代码     违章说明     违章罚款   违章扣分

Answer 1

当然可以了啊，NEW COLUMS；

Answer 2

当然可以了啊，NEW COLUMS；

Answer 3

你在设计时就可以设定COLUMS的多少呀，

Answer 4

Columns.Clear;       ListColumn:=Columns.Add;
       ListColumn.Caption:='违章代码;
       ListColumn.Alignment :=taCenter;       ListColumn:=Columns.Add;
       ListColumn.Caption:='违章说明';       ListColumn:=Columns.Add;
       ListColumn.Caption:=' 违章罚款';
       ListColumn.Alignment :=taLeftJustify ;       ListColumn:=Columns.Add;
       ListColumn.Caption:='违章扣分';
       ListColumn.Alignment :=taCenter;增加数据        while  xxxx  do
        begin
          ListItem := Items.Add;
          ListItem.Caption :='xxxx';
          ListItem.SubItems.Add('zzxxxx');
          ListItem.SubItems.Add('xxxxx');
          ListItem.SubItems.Add('xxxx');
        end;

Answer 5

点击ListView的Columns属性,在编辑对话框中可以添加列并设置相应列的属性

Answer 6

procedure AddColumn;
var newColumn: TListColumn;
begin
  newColumn:= ListView1.Columns.add;
  newColumn.caption:= '违章代码'
  newColumn:= ListView1.Columns.add;
  newColumn.caption:= '违章说明'
  newColumn:= ListView1.Columns.add;
  newColumn.caption:= '违章罚款'
end;procedure AddValue;
var listitem:= TListItem;
begin
listitem:= listview1.items.add;
listitem.caption:= 'dddd';
listitem.subitems.add('111');
listitem.subitems.add('222');
listitem.subitems.add('333');
end;
不过第一COLUMN的Alignment不能设为taCenter