i := ListView1.Items.Count; with ListView1 do begin ListItem:=Items.Add; ListItem.Caption:= IntToStr(i); ListItem.SubItems.Add('第'+IntToStr(i)+' 行'); ListItem.SubItems.Add('第三列内容'); end;