suma w listbox

Odpowiedz Nowy wątek
2006-12-27 22:09
karpiu71
0

mam na formularzu komponent listbox a w nim liczby (kazda w osobnej lini) podane
jak zsumowac wszystkie liczby z wszystkich lini i wyswietlic w edit

Pozostało 580 znaków

2006-12-27 22:32
Gumiś
0
var  
  i    : integer;
  suma : single;
begin
  suma:=0;
  for i:=0 to ListBox1.Items.Count-1 do
    suma:=suma+StrToFloatDef(ListBox1.Items[i],0);
end;

Pozostało 580 znaków

2006-12-27 22:33
Gumiś
0
var  
  i    : integer;
  suma : single;
begin
  suma:=0;
  for i:=0 to ListBox1.Items.Count-1 do
    suma:=suma+StrToFloatDef(ListBox1.Items[i],0);
end;

Pozostało 580 znaków

Odpowiedz
Liczba odpowiedzi na stronę

1 użytkowników online, w tym zalogowanych: 0, gości: 1, botów: 0