DelphiX Levl laden Im Level bewegen Aber Bilder verschwinden

[ISAS]

Es liegt an dem:

OnTimer:

Code:

DXDraw1.Surface.Fill(0);

Das heisst ja, das er die DXDrawfläche schwarz machen soll. Aber wenn er das macht, verschwindet der Hintergrund. Der Code für den Hintergrund lautet so:

Code:

  if steine[i,j].typ=1 then begin
  DXImageList1.Items[1].Draw(DXDraw1.Surface,i*33,j*33,0);
  end;
  .
  .
  .

Ich kann den Hintergrund nicht als class(TImageSprite) definieren, weil es dann bis zum geht nicht mehr ruckelt.