Delphi中的OnDrawCell过程访问冲突

Question

我对编程很陌生，在下面的DrawCell过程中遇到了访问冲突问题。

我正在创建一个迷宫，“二维数组”迷宫中的每个单元都有一个布尔属性，称为“ wall”。程序启动时，将数组中的所有单元格设置为“ Wall”

该行发生访问冲突

if maze[ACol, ARow].Wall = true then




procedure TfrmMazeGame.StrGridMazeDrawCell(Sender: TObject; ACol, ARow: 
integer; Rect: TRect; State: TGridDrawState);
begin
    if maze[ACol, ARow].Wall = true then
    begin
        StrGridMaze.canvas.Brush.Color := clGreen
    end
    else if maze[ACol, ARow].Wall = false then
        StrGridMaze.canvas.Brush.Color := clblue;
    StrGridMaze.canvas.fillrect(Rect);
end;