Sprites unter DelphiX drehen

[ATwardz]

Ich habs!

Erstens , hatte ich nicht den Sprite als TImageSpriteEX erstellt sondern TImageSprite!
Naja, danach lief es jedoch auch nit!
Mein Fehler war irgendwie simpel, jedoch fand/find ich ihn dennoch logisch!
Da der Code ja

Delphi-Quellcode:

X := X + Cos256(Angle);
Y := Y + Sin256(Angle);

lautete, danchte ich man könnte für Angle direkt eine Zahl einsetzen,logisch oder!?
Das man nun unbedingt der VAriable Angle einen Wert zuweisen muss, wusste ich ja nit!
wenn es geht spare ich gerne Variablen ein!

Naja für alle die ein Meister des Mißverstehens sind, so wie ich!So ist es für mich und somit für keinen mehr mißzuverstehen!Hoffe ich!

Delphi-Quellcode:

...
  TSprite = class(TImageSpriteEX)
  Public
    constructor create (aparent:Tsprite);override;
    procedure DoMove(MoveCount: Integer);override;
  end;
...
Procedure TSprite.domove(MoveCount: Integer);
Begin
  Angle:=Angle+1;
  Inherited domove(movecount);
  X := cos256(Angle);
  Y := sin256(Angle);
end;

Um endlich zum Abschluss dieses Threats zu kommen!

Vielen Dank nochmal an alle die mir geholfen haben!

ATwardz