ListView添加项目

var
NewItem:TListItem;

begin
    ListView1.Items.Clear;
    NewItem:=ListView1.Items.Add;
    NewItem.Caption:='01';
    NewItem.SubItems.Add('商品名称');
    NewItem.SubItems.Add('8折');
    NewItem.SubItems.Add(DateTimeToStr(dATE));
end;

//添加列项目
ListView1.Columns.Add.Caption := '标题';

posted @ 2009-03-26 21:32  DELPHI&.NET初学者[TECSOON WENDAY]  阅读(298)  评论(0)    收藏  举报