Thanks, I'll have a look :-)

I tried the following:

procedure TExplode.DoMove(MoveCount : integer);
begin
lifecount := lifecount +1;
if lifecount > 5 then
self.Dead;
end;

It works but the animation is too fast, no matter how slow I set the animspeed * updatespeed

Another solution is that I add a black (trransparent) image at the end of the animation...it works but I don't know if it will cause problems because the image is simply transparent and not realy dead. I tried it for long periods and there doesn't seem to be any negative effects. Maybe someone can comment on the last solution?

Thanks!