Hallo und Willkommen in der
DP 
,
an Deiner Stelle würde ich nicht TPictures in einem Array, sondern gleich TBitmaps in einer TObjectList ablegen. Dazu noch ein privates Feld für den aktuellen Index innerhalb der Objektliste, dann kannst Du vorwärts oder rückwärts in der Liste navigieren.
[edit]
Zitat:
SetLength(Bitmap2, High(Bitmap2) + 1);
Kann es sein, dass Du High mit Length verwechselt hast? [/edit]