Witam,
Mam taki programik:
var
i : integer;
suma,suma1,suma2 :single;
z,y,yy:string;
begin
Suma:=0;
for I:=0 to ListView1.Items.Count-1 do Suma:=suma+StrToFloat(ListView1.Items[I].Subitems[6]);
z:=floattostr(suma);
Label27.Caption := z;
zmienna z zwraca liczbe w postaci 123,1234567890
Jak to najprościej zaokrąglić do 2 miejsc po przeciku??
Próbowałem z trunc i round -ale coś mi nie wychodzi ;(
Pozdrawiam,
North :)