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 := '标题';

浙公网安备 33010602011771号