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+ 1If trenSlika = 4 Then trenSlika= 1
Image1.Visible = False
Image2.Visible = False
Image3.Visible = FalseIf trenSlika = 1 Then
Image1.Visible = True
End IfIf trenSlika = 2 Then
Image2.Visible = True
End IfIf 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.
Pratite Krstaricu na www.krstarica.com