Listview 求教

wawanihao 2005-06-05 09:58:25
我在listview中是这样显示的
学生 项目 罚金(元)
001 一 12.3
001 三 3.4
001 si 1.2
001 二 10
我想计算出罚金的总数,然后赋值给statcitext该怎么做?

...全文
106 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
qiujsh 2005-06-05
  • 打赏
  • 举报
回复
做循环取
budded 2005-06-05
  • 打赏
  • 举报
回复
var
SUM, F: Currency;

SUM := 0.0;
for I := 0 to ListView.Items.Count - 1 do
if ListView.Items.SubItems.COunt >= 2 then
if TryStrToFloat(ListView.Items.SubItems[1], F) then
SUM := SUM + F;

statcitext.Caption := Format('%M', [SUM]);
Kshape 2005-06-05
  • 打赏
  • 举报
回复
先用循环
for i:= ListView1.Items.Count - 1 downto 0
再用下面的例子去取值
Item[i].SumItems[index]//index表示第几列的值

在for中类加就可以了

5,402

社区成员

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

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