stringgrid, spaltensumme in endzeile

**henk**

moin moin, ich hätte da ein kleines problem, wo ich nicht weiterkomme...
hier ein beispielcode:

Delphi-Quellcode:

			procedure TForm2.Button1Click(Sender: TObject);

var

y, x : integer;

summe : double;

begin

 summe := 0;

 with stringgrid1 do

   begin

    for y:= fixedcols to colcount -1 do

      begin

       for x:= fixedrows to rowcount -3 do

         begin

          summe:= summe + strtofloat(cells[y,x]);

          cells[y,rowcount-1] := floattostr(summe);

         end;

      end;

   end;

end;

ich möchte die summe jeder spalte in der endzeile ausgeben, nur funzt das mit den schleifen nicht so, wie ich das will...
es werden in der endzeile ab spalte 2(3) die gesamten zellen addiert ausgegeben, nicht nur die der entsprechenden spalte...

vielleicht hat jemand ne anregung, wie ich den code ändern muss, damit nur die summe der jeweiligen spalte angezeigt wird...

vielen dank schon mal vorraus..

stringgrid, spaltensumme in endzeile

stringgrid, spaltensumme in endzeile

Forumregeln