delphi中listview错行显示的原因

Question

        listview1.ViewStyle:=vsreport;
        listview1.GridLines:=true;
        listview1.Clear;
        listview1.Columns.Add;
        listview1.Columns.Add;
        listview1.Columns.Items[0].Caption:='选修课程的名称';
        listview1.Columns.Items[1].Caption:='选修课程的人数';
        listview1.Items.Add.Caption:=combobox2.Text;
        listview1.Items.Add.SubItems.Add(inttostr(i));
问题是 combobox2.text与i不在一行显示原因

Answer 1

listview1.ViewStyle:=vsreport;
        listview1.GridLines:=true;
        listview1.Clear;
        listview1.Columns.Add;
        listview1.Columns.Add;
        listview1.Columns.Items[0].Caption:='?修?程的名?';
        listview1.Columns.Items[1].Caption:='?修?程的人?';
        with ListView1.Items.Add do
        begin
         Caption:=combobox2.Text;
        SubItems.Add(inttostr(i)));
       end;

Answer 2

listview1.Items.Add.Caption:=combobox2.Text; 
listview1.Items.Add.SubItems.Add(inttostr(i));
你这样相当于添加了两行