Also ich hab mal ein bissel rumprobiert aber irgendwie kom ich mit f5 f8 und f7 nicht weiter. da er gar nicht in den code reingeht. was mach ich falsch?
Code:
var
i, ilZeile : integer;
Summe : double;
begin
Summe := 0;
ilZeile := Stringgrid1.RowCount;
for i:= StringGrid1.Selection.Top to StringGrid1.Selection.Bottom do
begin
Summe := Summe+ StrtoFloatdef(Stringgrid1.Cells[1,i],0);
end;
Form1.StringGrid1.RowCount := Form1.StringGrid1.RowCount + 1;
Stringgrid1.Cells[1, ilZeile] := FloattoStr(Summe);