Question

delphi 在Form1中的ListView1添加右键功能，修改ListView1中的被选中项在Form2中的checkbox的checked为真

ListView1中的每一项在Form2中都有它的具体信息，而我想修改一项的checkbox控件的checked值为True,即 checkbox.checked:=True,如何实现？？
发 form2.checkbox(form1.listview1.selected.index).checked:=true; ???

Answer 1

{在创建Form2的时候添加此代码可实现你要的功能}
Form2:= TForm2.Create(Application);
if Form2.ShowModal = mrOk then
begin
Form2.CheckBox1.Checked:= Form1.ListBox1.Selected[0];
Form2.CheckBox2.Checked:= Form1.ListBox1.Selected[1];
{以此类推}
end;
Form2.Free;

追问

我是要在Form1的ListView1上添加右键菜单，选中ListView1上的一项点击右键弹出 看新闻与不看新闻 两项，看新闻代表 Form2上的这一个被选中项的checkbox1前面打勾，不看新闻就留空，
所以我的思路就是 在右键菜单“看新闻”这一项的click里面添加代码：From2.checkbox1.checked(Form1.ListView1.selected.Index):=True;
我不知道哪错了，Checkbox.checked不是只有True跟False吗，你的能那样赋值吗？

追答

1、Form1.ListBox1.Selected[0];的值就是布尔型的，所以可以赋值给Form2.CheckBox1.Checked；
2、你是想通过右键将所有新闻列表都进行选择是否查看新闻，然后在通过一个按钮将Form2创建出来么？Form2和Form1的关系是什么？

追问

Form1跟Form2的关系？我也不知道，反正他们都不是主窗口，有另个uMain才是主窗口，
（额外问一下，Listbox跟ListView是一个控件吗？我这用的好像是ListView） 我要实现的功能就是右键菜单点击“看新闻”项，Form2上的checkbox前面就打勾，同时Form1上的ListView上的“被右键”的那一项的“看新闻”项目显示0，（原来是显示X的），不用列什么新闻， listview里面应该导入了dbf文件

追答

1、看来你Form2是已经创建好，而且是用Form.Show而不是用Form.ShowModal，两个窗口可以来回切换是吧。
这样的话就在右键Click里面添加下列代码就可以实现：
Form1.CheckBox1.Checked:= Form2.ListView1.Selected.Index = 0;
这个CheckBox1和Index = 0这两个你自己设置。
2、不好意思看错了ListView跟ListBox不是一种控件，使用ListView1.Selected.Index = 0也可以给布尔类型赋值。

追问

可能你还是没明白我说的，不不，是我很难表达我想说的，不过谢谢朋友你那么有耐心哦。呵呵
ListView里面有300个用户，每个用户都能在FOrm2上面显示出他的信息（很多信息），所以说Form2似乎并不只有一个，每个用户在Form2上显示的信息都不一样的，显示我要修改一个用户在Form2上的某一项的属性，这跟我们平时一般的修改好像有了一个跨度，难实现吗？平时我们修改A的属性，现在我们要修改B中的A的属性。。

追答

非常简单，估计你是新手，还没有足够的编程思想。建议你使用数据库，a、在Form1的ListView里将所有用户信息都从数据库里显示出来；b、当你右键修改状态时将是否查看的状态存入数据库；c、每次打开任意Form2时读取用户信息，其中包括你修改后的是否查看的状态，根据这个状态进行具体操作。

追问

我如何修改？又如何存入？语句怎么样写啊，，我是新手，数据库都没用过，哈哈

追答

如果你一点数据库都不会那就难办了，建议你看一些数据库方面资料，从创建数据库、创建表、使用Delphi进行连接、添加、修改、删除等资料。
http://zhidao.baidu.com/question/26601979.html
这里有一个我以前教别人连Access数据库的帖子，你可以参考下。