Probleme mit Array of TImage

[flomei]

Hallo!
Hier im Forum habe ich ein bisschen Code gefunden der neue Images zur Laufzeit erzeugt...
Das sieht bei mir jetzt so aus:

Delphi-Quellcode:

procedure TMainForm.CreateNewEnemyTimer(Sender: TObject);
  var i:integer;
    Gegner : Array of Timage;
  begin
    setlength(Gegner,5);   
  for i := 0 to high(Gegner) do
    begin
      with Gegner[i] do
        begin
          Timage.Create(self);                      
          Picture.LoadFromFile(ExtractFilePath(paramstr(0))+'enemies\blue.ico');
          left := trunc(random * 300);
          height := 32;
          width:= 32;
          Visible := true;
          Show;
        end;
    end;
  end;

Das funktioniert nur leider nicht. Ich erhalte jedesmal die Meldung über eine Zugriffsverletzung. Wo muss ich was ändern damit es nicht mehr auftritt? Ich denke es liegt vielleicht an dem Bild das mir einige Sorgen bereitet. Ich habe oben in einer ComboBox den Gegner ausgewählt aber wie soll man dann den Pfad ändern???

Bin dankbar für jede Hilfe!

MfG Florian