for x := 1 to Spielfeld.Breite do
  begin
    for y := 1 to Spielfeld.Hoehe do
    begin
      imFeld[x,y] := TImage.Create(imFeld[x,y]);    // Konstruktor
      with imFeld[x,y] do
      begin
        Parent:= Form1;             //das Objekt gehört zu Form1
        ...
        case Spielfeld.Feld[x,y].Inhalt of
          0: Picture.Bitmap := bmpNichts;           // Bitmap zuweisen!
          1: Picture.Bitmap := bmpWand;
        end;
        Show;                                       // TImage anzeigen
      end;
    end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  bmpWand := TBitmap.Create;
  bmpWand.LoadFromFile('wand.bmp');
...