stringgrid - sčítání hodnot buněk ve sloupci

[nemozoo]

Krásný den... jsem tu dnes poprvé...
potřebuji poradit....
jak v Edit1.text..... zobrazit součet hodnot buněk ve slupci stringgrid1
děkuji Nemo

[Delfin]

Za predpokladu ze by slo o hodnoty typu Integer, dalo by se jen iterovat sloupcem a s konverzi retezcu sumu pocitat. Napr. pro druhy sloupec by se dalo napsat neco ve smyslu:

Kód: Delphi [Vybrat]

1. var
2.   I: Integer;
3.   Sum: Integer;
4. begin
5.   Sum := 0; // nastaveni vychozi hodnoty sumy
6.   for I := 0 to MyStringGrid.Cols[1].Count - 1 do // iterace retezci druheho sloupce
7.     Sum := Sum + StrToInt(MyStringGrid.Cols[1][I]); // pricteni hodnoty aktualne iterovaneho radku
8. end;

[nemozoo]

super a díky....
posunul jsem jen o první pevný řádek a perfektně to sčítá...
    Sum := 0;
    for I := StringGrid1.RowCount - 1 downto 1 do //posun o pevný řádek dolu
    Sum := Sum + StrToInt(StringGrid1.Cols[1]);

[nemozoo]

ještě bych potřeboval pomoci s jedním problémem...
přidání do stringgrid1, ve sloupci 2, do každé bunky checkbox....
díky Nemo

[Delfin]

Zkus se podivat do kapitoly CheckBox Column.