Kirjautuminen

Haku

Tehtävät

Keskustelu: Ohjelmointikysymykset: VB6: Animoitu Sprite

kayttaja-3842 [25.04.2006 21:53:26]

#

Miten onnisuisi tehdä animoitu sprite VB6:lla? Eli kun painetaan vasemmalle tulee animaatio missä sprite kävelee vasemmalle ja kun painetaan oikealle niin tulee tietenkin animaatio missä sprite kävelee oikealle?

Tumppu [25.04.2006 22:02:30]

#

Vaikka näin:

Private Animaatiomuisti As Double

Private Sub Form_Load()
Animaatiomuisti=0
End Sub

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
'kun nappia painetaan vasemmalle
If KeyCode = vbKeyLeft Then Liikuta_Vasemmalle
'kun nappia painetaan oikealle
If KeyCode = vbKeyRight Then Liikuta_Oikealle
End Sub

Private Sub Liikuta_Vasemmalle()
Äijä.Left = Äijä.Left - 1
Äijä.Picture = LoadPicture(App.Path & "/Vasemmalle/" & Animaatiomuisti & ".jpg")

Animaatiomuisti = Animaatiomuisti + 1

'Tähän sitte ton 5:n tilalle se luku kui monta kuvaa siellä on...
If Animaatiomuisti = 5 Then Animaatiomuisti = 0
End Sub

Private Sub Liikuta_Oikealle()
Äijä.Left = Äijä.Left + 1
Äijä.Picture = LoadPicture(App.Path & "/Oikealle/" & Animaatiomuisti & ".jpg")

Animaatiomuisti = Animaatiomuisti + 1

'Tähän sitte ton 5:n tilalle se luku kui monta kuvaa siellä on...
If Animaatiomuisti = 5 Then Animaatiomuisti = 0
End Sub

laita noi sitten vaikka timeriin (ei hyvä) jos haluat hidastaa liikettä...

tuomas [25.04.2006 22:34:48]

#

Eikö tuo ole hieman hidasta ladata kuva joka käänteessä uudestaan? Blittais vaikka isommasta kuvasta aina oikean palan tms.

Tumppu [25.04.2006 22:37:02]

#

nii on joo! mut toi oli lähinnä toi et miten sen saa animoitua! :)

kayttaja-3842 [26.04.2006 10:48:17]

#

hmm noh tjaa.. Mites tämä onnistuu DirectX8 käyttäen?

Blaze [26.04.2006 11:54:58]

#

Periaatehan on täysin sama, Picture-ominaisuuden asettamisen sijaan vain piirrät DX:n tarjoamilla työkaluilla (D3DSprite.Draw())

kayttaja-3842 [26.04.2006 13:10:11]

#

Joo kiitos paljon...Osaanin tästä luultavasti itse..

Vastaus

Aihe on jo aika vanha, joten et voi enää vastata siihen.

Tietoa sivustosta