Delphi 向TListView组件中添加项目，实现的功能相信大家还是挺熟悉的，比如Windows中更改成图标查看方式时的内容列表，图标排列的风格，在本例子中，是使用Delphi7.0中的TListView控件来实现，具体还是很方便的：
procedure TForm1.SpeedButton1Click(Sender: TObject);
var
myitem:TListItem;
i : integer;
begin
MyItem:=ListView1.Items.Add; //添加一列表项
MyItem.Caption:='MingriSoft'; //添加的列表项标题
MyItem.ImageIndex:=0; //添加的列表项的图标编号
end;
end.
