Forum: Multimedia
Delphi
by Die Muhkuh,
23. Jan 2005
Hi,
1000 = 1 Sek. 24/1000 = 24 Frames pro Sekunde (kommt auch auf den Timer an, wie der eingestellt ist).
Wenn ich das so mache, wie ich es gesagt habe, habe ich keine PRobleme damit.
Forum: Multimedia
Delphi
by Die Muhkuh,
23. Jan 2005
Hi,
24/100? :shock: Nenene du, das müssen 24/1000 sein. Nciht 24/100. Deswegen klappte das bei mir auch. Ich hab da aus reflex 24/1000 hingeschrieben. Änders mal (auch bei der Explosion)
constructor TAnimation.Create(AParent: TSprite);
begin
inherited Create(AParent);
Image := Form1.DXImageList1.Items.Find('1');
Width := Image.Width;
Height := Image.Height;
Forum: Multimedia
Delphi
by Die Muhkuh,
23. Jan 2005
Hi,
ich glaub ich hab ihn:
procedure TAnimation.DoCollision(Sprite: TSprite; var Done: boolean);
begin
if not FCollision then
begin
if Sprite is TStone then
begin
FCollision := true;
Forum: Multimedia
Delphi
by Die Muhkuh,
23. Jan 2005
Hi,
mach mal die Animationgeschwindigkeit (AnimSpeed) kleiner. Vielleicht 15/1000. Dann sieht du welche abgespielt werden
Forum: Multimedia
Delphi
by Die Muhkuh,
23. Jan 2005
Hi,
kannst du nochmal genau beschreiben, was nicht passiert?
Das die nur die letzten zwei Bilder angezeigt werden ist komisch
Forum: Multimedia
Delphi
by Die Muhkuh,
23. Jan 2005
Hi,
ich kann dir das nicht bestätigen. Bei mir wird alles angezeigt.
Aber mir ist was anderes aufgefallen:
constructor TAnimation.Create(AParent: TSprite);
begin
inherited Create(AParent);
Image := Form1.DXImageList1.Items.Find('1');