TListView 控件用法

procedure TForm1.btn1Click(Sender: TObject);
  var
    List:TListItem;
begin
  lv1.Columns.Add.Caption := 'ID';
  lv1.Columns.Add.Caption := 'User';
  lv1.Columns.Add.Caption := 'PassWord';
  lv1.Columns.Add.Caption := 'Start';
  //添加三列,或者叫三柱;

  lv1.Items.Add.Caption := '1'; //添加一行;TListView控件要先创建行,下面的代码才会生效。
 // lv1.Items.Item[0].Caption := '腾讯';  //同上,第一行的标题;
 // lv1.Items.Item[0].SubItems.Add('QQ'); // SubItems 表示第一行的第二个单元格; 我们常说的第二列;
 //lv1.Items.Item[0] 代表第一行 0是整数,依次类推;
  List := lv1.Items.Item[0] as TListItem;

  List.SubItems.Add('aa');   //第一行第二个单元格;
  List.SubItems.Add('');     //第一行第三个单元格;
  List.SubItems.Add('在线');  //第一行第四个单元格;
  //但是这样写效率很低,不能指定某一列。下面的代码就可以解决这个问题;

  //要将 TListView 转换为 TListItem 以下的代码才有效;
  //在指定的列中添加数据;
  list.SubItems[0] := 'fdsa';
  list.SubItems[2] := 'fdsa';
end;

注解写得比以住详细,因为行与列有时候会混熬。

posted @ 2012-02-23 14:19  stma  阅读(225)  评论(0)    收藏  举报