Visual Basic – Jednostavna animacija

U Visual Basic-u postoje razni načini za dobijanje animacije. U ovom tekstu ćemo vam prikazati kao da dobijete jednostavnu animaciju, za recimo vaš „screen saver“. Svi znamo da se jedan sekund televizijske slike dobija kroz 24 slike (frejma) koji idu jedan iza drugog. Na ovaj način se zbunjuje naše oko koje nije dovoljno osetljivo da primeti razliku (brzo smenjivanje statičnih slika) i nama se čini da imamo pokret. Na sličan način i vi možete u VB projekt dodati ovakvu animaciju i to brzim menjanjem sadržaja u „Image“ kontroli.

A sada da počnemo sa kreiranjem, pokrenite VB projekt i postavite tri „Image“ kontrole na formu. Za svaku kontrolu podesite osobinu „picture“ da bi podesili za svaku neku sliku. Takođe na formu postavite i „Timer“ kontrolu i podesite osobinu interval na 200. Sada ćemo iskoristiti Timer kontrolu da napravimo animaciju, ova kontrola se nalazi na standardnom VB toolbox-u. Kada smo interval podesili na 200, u stvari smo „rekli“ kontroli Timer da izvršava određeni kod svakih 200 milisekundi. U našem slučaju na ovaj način ćemo generisati iluziju animacije.

Dodajte sledeći kod u prostor deklaracija naše forme (Form1).


Public trenSlika As Integer

Sledeći kod dodajte u Timer događaj timer kontrole:

trenSlika = trenSlika+ 1

If trenSlika = 4 Then trenSlika= 1

Image1.Visible = False
Image2.Visible = False
Image3.Visible = False

If trenSlika = 1 Then
Image1.Visible = True
End If

If trenSlika = 2 Then
Image2.Visible = True
End If

If trenSlika = 3 Then
Image3.Visible = True
End If


Ovo je sav potreban kod za našu prvu jednostavnu animaciju; pritisnite „F5“ da bi pokrenuli program. Šta se dešava, ono što vidite je da se „Image“ kontrole pojavljuju i nestaju i to naizmenično.

Prvom linijom koju smo dodali u sekciju deklaracija, definisali smo javnu varijablu (tj. moguće je deliti kroz sve funkcije u aplikaciji). A kod koji smo dodali u Timer predstavlja sledeće:

  • postavlja da sve slike budu nevidljive
  • pridodaje slike varijabli „trenSlika“
  • u zavisnosti od vrednosti varijable, jedna po jedna slika postaje vidljiva.
Ovo je vrlo jednostavna animacija, ali s malo mašte i truda možete napraviti svašta. Npr. možete postaviti „Image“ kontrole jednu iznad druge, a slike treba da budu takve da se njihov sadržaj logično smenjuje. Tada će efekat biti mnogo bliži televizijskoj analogiji.

Pratite Krstaricu na www.krstarica.com