关于ListView中返回被check了的值的处理,高分!!!!!!!!!

J7T 2002-07-23 09:50:09
上次在这里问了个关于如果返回在listview中checked为True中如何处理的问题
上次给出的代码是
var
i:integer;
begin
for i := 0 to listview1.items.count - 1 do
begin
if listview1.items[i].checked then
//listview1.item[i]被check了
end;
以下是我的处理方法
var
i:integer;
a:string;//我加的
b:string;//我加的
begin
for i := 0 to listview1.items.count - 1 do
begin
if listview1.items[i].checked then
a:=listview1.items[i].caption;//我加的
b:=a+b;//我加的
edit1.text:=b;//我加的
end;
但是现在问题就出现了如果i是多少那么a和b的值就会重复显示多少次我该怎么解决呢?请给出代码,谢谢
...全文
46 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
johnsonrao 2002-07-24
  • 打赏
  • 举报
回复
一个Edit也不够用呀?
J7T 2002-07-23
  • 打赏
  • 举报
回复
其实是这样的
我在listview里列出一些查找出来的文件的路劲
现在我要做的是在edit1里显示出那些check为真的那些
johnsonrao 2002-07-23
  • 打赏
  • 举报
回复
b:=b+a;//我加的

你是想存在一个字符串里,还是存在一组字符串里?不太明白。
J7T 2002-07-23
  • 打赏
  • 举报
回复
谢谢 但是还是有问题
如果i的数目少没有问题
但是一多了 仍然还是有那个问题 不过只是第一个值重复 那要怎么写呢?
johnsonrao 2002-07-23
  • 打赏
  • 举报
回复
for i := 0 to listview1.items.count - 1 do
begin
if listview1.items[i].checked then
a:=listview1.items[i].caption;//我加的
b:=a+b;//我加的
// edit1.text:=b;//我加的
end;

edit1.text:=b;//我加的

5,392

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧