16,743
社区成员
发帖
与我相关
我的任务
分享
都说了如此反复啊。。。
item:=listView1.add // 增加第一行
item.caption:='1';// 第一行的第一列
item.subitems.add('阿扁'); // 第一行的第二列
item.subitems.add('小马哥');// 第一行的第三列
...... // 你还不知道怎么增加第四列么?
//第一行结束,几开始第二行
item:=listview1.add;// 增加第二行
item.caption:='2';// 第二行的第一列
item.subitems.add('涛哥'); // 第二行的第二列
item.subitems.add('平哥');// 第二行的第三列
参照4楼也可以
lv1.Items[0]:= '10'; // 修改第1行第1列
lv1.Items[0].SubItems[0]:= '涛哥'; // 修改第1行第2列
lv1.Items[0].SubItems[1]:='100岁'; // 修改第1行第3列
lv1.Items[1]:= '20'; // 修改第2行第1列
lv1.Items[1].SubItems[0]:= '平哥'; // 修改第1行第2列
lv1.Items[1].SubItems[1]:='60岁'; // 修改第1行第3列
都说了如此反复啊。。。
item:=listView1.add // 增加第一行
item.caption:='1';// 第一行的第一列
item.subitems.add('阿扁'); // 第一行的第二列
item.subitems.add('小马哥');// 第一行的第三列
...... // 你还不知道怎么增加第四列么?
//第一行结束,几开始第二行
item:=listview1.add;// 增加第二行
item.caption:='2';// 第二行的第一列
item.subitems.add('涛哥'); // 第二行的第二列
item.subitems.add('平哥');// 第二行的第三列
参照4楼也可以[/quote]
可是我是不会写入数据到指定的第I行第I列里面
var
item: TListItem;
begin
listView1.ViewStyle := vsReport;// 设置ListView为报表形式
listView1.Columns.Add; // 增加1列
listView1.Columns.Add; // 再增加1列
listView1.Column[0].Caption := '序号'; // 第一列标题
listView1.Column[1].Caption := '姓名'; // 第二列标题
// 下面开始填充这个表格的内存
// TListView 的每一行是一个TListItem对象
item := listView1.Items.add; //增加一行,即增加一个TListItem对象,Add函数返回这个TListItem对象。
item.Caption := '1'; // TLisItem对象的caption就表示这行的第一列,即你图标中的序号列的第一行第一列
// TListItem对象的SubItems是一个字符串集合,即表示该行的第2~N列
item.SubItems.Add('阿扁'); // 添加第一行第二列的数据,即姓名列的值
// ........
// 如此反复添加Columns列 和 TListItem及其subitem 即可填充为一个表
end;