Question

delphi listview修改当前选中行

现在已经做到右键单击form1上的listview 弹出popupmenu 单击修改。弹出form2。。。
form2上有三个edit控件，一个button.。。各位老师。怎么单击button1。把listview当前选中行的
listview1.selected.caption := edit1.text;
listview1.selected.subitems.strings[0] := edit2.text;
listview1.selected.subitems.strings[1] := edit3.text

Answer 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;

Answer 2

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