[Andorra]Größe der Animationsdatei

[freak4fun]

Hi,
ich hab eine Animation von einer Figur. Diese Figur soll in alle Himmelsrichtungen (8) gehen. Bild ist angehängt. Wenn ich aber die Richtungen setze, tanzt die Figur rum. Kann das mit der Größe der Datei zusammenhängen?

Delphi-Quellcode:

procedure TFigur.SetLine(ADirection: TDirection);
begin
  // 8 Richtugnen -
  (*
    E   - 00-07
    N   - 08-15
    NE  - 16-23
    NW  - 24-31
    S   - 32-39
    SE  - 40-47
    SW  - 48-55
    W   - 56-63
  *)
  FDirection := ADirection;
  case FDirection of
    none: begin // keine
            AnimStart := 33;
            AnimStop := 33;
            XSpeed := 0;
            YSpeed := 0;
          end;
     N: begin // N
          AnimStart := 16;
          AnimStop := 23;
          XSpeed := 0;
          YSpeed := -150;
        end;
    NE: begin // NE
          AnimStart := 16;
          AnimStop := 23;
          XSpeed := 150;
          YSpeed := -150;
        end;
     E: begin // E
          AnimStart := 8;
          AnimStop := 15;
          XSpeed := 150;
          YSpeed := 0;
        end;
    SE: begin // SE
          AnimStart := 40;
          AnimStop := 47;
          XSpeed := 150;
          YSpeed := 150;
        end;
     S: begin // S
          AnimStart := 24;
          AnimStop := 31;
          XSpeed := 0;
          YSpeed := 150;
        end;
    SW: begin // SW
          AnimStart := 48;
          AnimStop := 55;
          XSpeed := -150;
          YSpeed := 150;
        end;
     W: begin // W
          AnimStart := 0;
          AnimStop := 7;
          XSpeed := -150;
          YSpeed := 0;
        end;
    NW: begin // NW
          AnimStart := 24;
          AnimStop := 31;
          XSpeed := -150;
          YSpeed := -150;
        end;
  end;
end;

MfG
freak