delphi 的 listview 怎么通过代码删除整列

delphi 的 listview 如何通过代码删除整列
delphi 的 listview 如何删除整列
ListView1.ListItems.Remove (i) 可以删除行,但不知道怎么删除列?
比如 我初步设计的是五列 
如何通过代码删除最后一列 
成为四列!
------解决方案--------------------
ListView1.Columns.Delete
------解决方案--------------------
ListView1.Columns.Items[0].Destory