Einzelnen Beitrag anzeigen

Natcree

Registriert seit: 5. Mär 2013
502 Beiträge
 
Delphi 7 Enterprise
 
#1

Im Striggrid zellen und Spalten addieren

  Alt 6. Mär 2013, 17:41
Habe ein Stringrid und möchte in jeder reihe col 2 und 3 addieren das ist soweit kein problem wie die unten im code siehst. Das ergebnis soll in der col 4 ausgegeben werden.

Nun soll aber in der 4 col das ergebnis der reihe stehen und mit dem ergebnis der 4. col aus der reihe drüber addiert werden. Ich hoffe du kannst das nachvollziehen?


Delphi-Quellcode:
procedure TForm1.Button18Click(Sender: TObject);
var i: integer;
     Summe: double;
 begin
   Summe := 0;
   for i := 1 to eltreeStringGrid1.RowCount - 1 do
 eltreeStringGrid1.Cells[4,i]:=eltreeStringGrid1.Cells[2,i]+eltreeStringGrid1.Cells[3,i];


end;
  Mit Zitat antworten Zitat