Hallo,
du machst dir das Leben unnötig schwer:
Delphi-Quellcode:
procedure TMultiForm.Berechnung;
var
iCol, iRow: Integer;
begin
with StringGrid do
for iRow := 1 to Pred(RowCount) do
for iCol := 1 to Pred(ColCount) do
Cells[iCol, iRow] := IntToStr(iCol * iRow);
end;
Beim Vergleich findest du deine Fehler.
Grüße vom marabu