delphi listview修改当前选中行

2025-03-03 17:10:53

推荐回答（2个）

回答（1）：

在form2增加一个button，caption设为确定，modelResult设为mrOK，不用任何代码
form2.showmodel;
if form2.modelResult = mrOK then
begin
listview1.selected.caption := form2.edit1.text;
listview1.selected.subitems.strings[0] := form2.edit2.text;
listview1.selected.subitems.strings[1] := form2.edit3.text
end;

回答（2）：

listview1.selected.caption := form2.edit1.text;
listview1.selected.subitems.strings[0] := form2.edit2.text;
listview1.selected.subitems.strings[1] := form2.edit3.text