我认为我的问题有解决方案,但我没有找到,你能帮帮我吗?
我想做这样的事情:
var
a, b, c: string;
d: integer;
begin
a := StringGrid1.Cells[1,1];
b := StringGrid1.Cells[2,1];
c := StringGrid1.Cells[3,1];
d := StrToInt(a) + StrToInt(b) + StrToInt(c);
StringGrid1.Cells[4,1] := IntToStr(d);
end;
但是现在我需要像这个例子一样声明 200 个字符串变量。无论如何有一个“捷径”吗?
这是我尝试过的循环:
var
x: integer;
begin
for x := 1 to 200 do
begin
Form2.StringGrid1.Cells[3,209] := IntToStr(x);
end;
end;