Zugriffsverletzung bei if in einer for-Schleife

[TurboMartin]

Hi Leute,
ich hab folgenden Code:

Delphi-Quellcode:

var I: Integer;
    Image: Array[1..13] of TImage;
begin
  for I := 0 to 12 do
    if (Image[I+1].Top = 96) and (Image[I+1].Left = 8) then Image[I+1].Top := 48
    else if (Image[I+1].Top = 48) and (Image[I+1].Left = 536) then Image[I+1].Top := 96
         else if (Image[I+1].Top = 96) and (Image[I+1].Left = 536) then Image[I+1].Top := 144
              else if (Image[I+1].Top = 144) and (Image[I+1].Left >= 9)then Image[I+1].Left := Image[I+1].Left - 8
                   else if (Image[I+1].Top = 144) and (Image[I+1].Left = 8) then Image[I+1].Top := 96
                        else Image[I+1].Left := Image[I+1].Left + 8;

end;

allerdings krieg ich in der forschleife schon beim zweiten mal Image[I+1] (Image[I+1].Left = 8) eine zugriffsverletzung, die sich dauernd wiederholt(durch die schleife). was mache ich falsch???