Запись в двумерный массив

[Vova777]

Код копирует область изображения, потом эту область попиксельно проверяет на наличие черного цвета и пишет в массив в ячейку соответствующую координатам пикселя переменную ab.

Image2.Canvas.CopyRect(Rect(xk - 60, yk - 60, xk + 60, yk + 60), Image1.Canvas, Rect(xk - 60, yk - 60, xk + 60, yk + 60));
  for ipx:= 0 to xk + 60 do
    begin
      for ipy:= 0 to yk + 60 do
        if Image2.Canvas.Pixels[ipx, ipy] = clBlack then field[(xk - 60) + ipx, (yk - 60) + ipy]:= ab;
    end;

Вылетает с ошибкой.
И в массив ничего не пишет, даже если не вылетает. Причем может пол кода с этим фрагментом сделать, а в какой-то момент вылетит.

[mss]

И чего хочешь ?
Чтобы кто-то догадался что и каким курсом у тебя там "вылетает" ?)

[Vova777]

Сообщение от mss

И чего хочешь ?
Чтобы кто-то догадался что и каким курсом у тебя там "вылетает" ?)

В массив почему не пишет?