看不到数组的内容

Question

我正在尝试扫描数组的内容以查找 3x3 井字游戏。当用户已经完成并且现在是计算机移动的时间时，将调用以下过程。

gameBoard 数组应该充满'?'此时，除了人类玩家刚刚放置的'X'。我只是想检查有多少'？在数组中，这些将是可供计算机选择的可用空间。我想将结果放在 label2 中，这样我就可以检查它是否正常工作，但事实并非如此。此时它应该在标签中显示“8”。

提前致谢

var
  i, iCount, j: Integer;
begin

  label1.Caption := 'Computer''s turn';
  // scan through gameboard to check available spaces
  for i := 1 to 3 do
    for j := 1 to 3 do

      if (gameBoard[i, j] = '?') then
      begin
        iCount := iCount + 1;

      end;
  Label2.Caption := inttostr(iCount);

end;```

Answer 1

Delphi 中的局部变量未初始化，因此在过程运行时 iCount 可以具有任何值。在开始循环之前将 iCount 设置为零。

看不到数组的内容

Can't see contents of array

arrays

delphi