Timer / Bomberman

[DGL-luke]

no Problem.

btw: deine Bomben sollten vielleicht noch ein "IsExploded"-Flag (Boolean-Feld) bekommen, denn wenn es Kettenreaktionen etc. gibt, könntest du in deiner for-schleife auf Index-Probleme stoßen.

Sprich:

Delphi-Quellcode:

for i := Bombs.Count-1 downto 0  do
begin
  if Bombs[i].IsExploded then
    Bombs.Delete[i]
  else
  if Bombs[i].ExplosionStamp < GetTickCount then
  begin
    DoExplosion(Bombs[i]);
    Bombs.Delete(i);
  end;
end;

Im "DoExplosion" würdest du dann verbundene Bomben gleich mit explodieren lassen und nur das "IsExploded"-Flag setzen.