1.下面的表示,选中行会变成'aaaa'.listbox不同于listview.
procedure TForm1.ListBox1Click(Sender: TObject);
var i : integer;
begin
for i := 0 to listbox1.Count -1 do
begin
if listbox1.Selected[i] then
listbox1.Items[i] := 'aaaa';
end;
end;
2.如楼上所说,显示顺序可能会改变
ListView1.Selected 选中项
修改选中项ListView1.Selected.Caption:='';
再新建一个和直接修改
再新建一个会改变ListView的显示顺序
内容全部来源于网络收集，如有侵权，请联系网站删除！