Delphix Опции

[#$# PaVeL #$#]

Объясните глюк Игрок - потомок TImageSprite? процедура

Procedure TBasePlayer.Boom;
Begin
  Self.Collisioned := False;

  Self.Image := MainForm.DXImageList.Items.Find('Explosion');
  Self.Width := Self.Image.Width;
  Self.Height := Self.Image.Height;

  Self.AnimLooped := False;
  Self.AnimCount := Self.Image.PatternCount - 1;
  Self.AnimStart := 0;
  Self.AnimPos := 0;
  Self.AnimSpeed := 1/15;
End;

Но изображение не изменяется!?