Animation mit TImage!

[Ag3nt]

So Problem auch gelöst!

Delphi ist ja EaSY :)
gefällt mir :)

Also hier der Code fürs rukelfreie :)

Delphi-Quellcode:

procedure TForm1.Timer1Timer(Sender: TObject);
begin


        Image1.Picture.LoadFromFile ('pics/1_'+IntToStr(temp)+'.bmp');
        Paintbox1.Canvas.Draw(0,0,Image1.Picture.Graphic);
        inc(temp);
        if temp = 4 then temp := 1;



end;

procedure TForm1.FormCreate(Sender: TObject);
begin
temp:= 1;
end;

end.

Man muß einfach das Pic in einem Image laden und dann in eine Paintbox kopieren uns schon gehts :)

[Ag3nt]

Wichtig dabei ist das dann das Image auf Visiab... auf False ist sonst sieht man es doppelt :)

[Mat]

wenn dein problem geloest ist, brauch ich mich ja nich durch die kaefer-animation fummeln.. *puh* hab ja auch noch nich soviel delphi ahnung



Mat

[Ag3nt]

Zitat:

Zitat von Mat

wenn dein problem geloest ist, brauch ich mich ja nich durch die kaefer-animation fummeln.. *puh* hab ja auch noch nich soviel delphi ahnung



Mat

ich erlich gesagt auch noch nicht :)

Danke nochmals :firejump:

[Ag3nt]

Hier für Tamagotchi Fans ein JavaScript Tamagotchi sieht nur doof aus :)

http://www.engsoc.carleton.ca/~derid...i/newtama.html

[Spoon]

Eine ganz andere variante:

Wenn du Flash beherrschst kannst du einfach kleine Flash animationen nehmen und in einer WebBrowser Kompo anzeigen... wie gesagt falls du flash beherrschst ;)

Die sind dann alle flackerfrei und leicht zu erstellen :bounce1: