Hallo,
hier bietet sich doch TryStrToInt an.
etwa so
Delphi-Quellcode:
var
i_1, i_2, i_3: Integer;
iSum: Integer;
for iCurRow:= 1 to 16 do
begin
i_1:= 0;
i_2:= 0;
i_3:= 0;
TryStrToInt(Grid.Cells[, iCurRow], i_1);
TryStrToInt(Grid.Cells[, iCurRow], i_2);
TryStrToInt(Grid.Cells[, iCurRow], i_3);
iSum:= i_1+i_2+i_3;
Grid.Cells[, iCurRow]:= IntToStr(iSum);
end;
Die Cols habe ich einfach mal weggelassen.
Heiko