没有报错，但是想要的图像之类的显示不出来

refresh;
  bgimg:=Tpngimage.Create;
  bgimg.LoadFromFile(extractfilepath(application.ExeName)+'pictures\battleback'+inttostr(battleid)+'.png');
  canvas.Draw(imgbg.Left,imgbg.Top,bgimg);
  for i := 1 to 6 do
    begin
      optimg[i]:=Tpngimage.Create;
      randomize;
      j:=random(12)+1;
      optimg[i].LoadFromFile(extractfilepath(application.ExeName)+'pictures\'+event[j]+'.png');
      canvas.Draw(imgbg.Left,50*(i-1)+imgbg.Top,optimg[i]);
    end;  //在场景中安置敌人
  setlength(enyimg,enytotal);
  for i := 1 to enytotal do
    begin
      enyimg[i]:=Tpngimage.Create;
      randomize;
      enyimg[i].LoadFromFile(extractfilepath(application.ExeName)+'pictures\battlers\'+enyenglishname[i]+'.png');
      eny_x:=random(imgbg.Width-enyimg[i].Width)+imgbg.Left+40;
      eny_y:=random(imgbg.Height-enyimg[i].Height)+imgbg.Top;
      canvas.Draw(eny_x,eny_y,enyimg[i]);
    end;
  //在场景中安置我方队友
  setlength(chtimg,chttotal);
  for i := 1 to chttotal do
    begin
      chtimg[i]:=Tpngimage.Create;
      randomize;
      chtimg[i].LoadFromFile(extractfilepath(application.ExeName)+'pictures\battlers\'+chtenglishname[i]+'.png');
      cht_x:=random(imgbg.Width-chtimg[i].Width)+imgbg.Left+40;
      cht_y:=random(imgbg.Height-chtimg[i].Height)+imgbg.Top;
      canvas.Draw(cht_x,cht_y,chtimg[i]);
    end;到在场景中安置敌人这一部就读不出来了。请教一下各位！