delphi listview里 怎么添加 TButton

listview里不是能不能添加TButton的问题，而是该不该的问题。

Delphi目前的类定义，你没办法做，如果你用API费尽九牛二虎之力去画一个，而且能对鼠标正确响应的话，也是费力不讨好——对Listview的 *** 作，实际上早就有成熟的惯例：对空白处点右键出菜单，对Item点右键出菜单，这两样你怎么不用呢？只要加两个（其实一个就够，看你水平了）右键菜单对象就够，在里面添加 *** 作命令项。一般除了右键菜单外，还可以在程序顶部主菜单下面的位置添加工具条，上面随你放各种Button，功能和右键菜单一样.

======================

在panel上添加 button，当然直接加了，不明白为什么这么问

在你的 button事件写

ListBox2.Items.AddStrings(ListBox1.Items)// 这个是把ListBox1所有的内容都添加到ListBox2

你还可以吧你选中的那条添加到 ListBox2

ListBox2.Items.Add(ListBox1.Items[ListBox1.ItemIndex])

---