Array of Tpicture?

[DerMario]

hallo,

ich bräuchte in einem programm ein array das ich mit bildern vollstopfen kann also ein Array of tpicture.
ich habe da mal ein vereinfachtes prog gebastelt um zu demonstrieren was ich meine...

Delphi-Quellcode:

uses jpeg;

var 
  bilder:array[1..4] of tpicture;

procedure TForm1.Button1Click(Sender: TObject);
begin
  bilder[1].create;
  bilder[1].LoadFromFile('bild01.jpg');
  bilder[2].create;
  bilder[2].LoadFromFile('bild02.jpg');
  bilder[3].create;
  bilder[3].LoadFromFile('bild03.jpg');
  bilder[4].create;
  bilder[4].LoadFromFile('bild04.jpg');
end;

wenn ich das prog dann aber starte und den button1 betätige gibt es eine zugriffs verletztung.

hat jemand ne ahnung warum?

mfg mario