Código Delphi [-] ... total:= total + StrToFloat(li.SubItems[Lista.Columns.Count-2]);
... total:= total + StrToFloat(li.SubItems[Lista.Columns.Count-2]);