U VB programskom jeziku, animaciju možemo da postavimo na nekoliko načina. Današnji primer je jedan od načina gde je potrebno nacrtati nekoliko sličica, a onda u tajmeru podesiti da se sličice pojavljuju jedan za drugom, nešto slično kao prilkom izrade crtanog filma. Za crtanje možemo upotrebiti razne programe, danas ćemo upotrebiti PAINT.
PROJEKAT SEMAFOR
Kao što sam i rekao, prvo ćemo nacrtati tri semafora i to tako da prvo nacrtamo jedan semafor, a na njemu obojimo zeleno svetlo. Ceo crtež pomerimo u gornji levi ugao prostora za crtanje, zatim smanjimo ceo prostor za crtanje tako da bude veličine semafora. Semafor snimimo pod imenom TRFFC10A.ICO. Sledeće što treba uraditi jeste da sada na istom crtežu zeleno svetlo obojimo u belo, a dodamo žutu boju srednjem krugu. Crtež snimimo pod imenom TRFFC10B.ICO. Ponovimo ceo postupak, ali sada obojimo gornji krug u crveno, crtež snimimo pod imenom TRFFC10.ICO.
Sledeći korak je kreiranje obrasca u VB-u i podešavanje svojstava.
Hajde da sada napišemo kod. Dupli klik mišem na obrazac, a onda iznad Private Sub Form_Load() morate deklarisati promenljivu TrenutnaBoja.
Nakon ovog koda kliknemo na Timer i upišemo sledeći kod:
PROJEKAT SEMAFOR
Kao što sam i rekao, prvo ćemo nacrtati tri semafora i to tako da prvo nacrtamo jedan semafor, a na njemu obojimo zeleno svetlo. Ceo crtež pomerimo u gornji levi ugao prostora za crtanje, zatim smanjimo ceo prostor za crtanje tako da bude veličine semafora. Semafor snimimo pod imenom TRFFC10A.ICO. Sledeće što treba uraditi jeste da sada na istom crtežu zeleno svetlo obojimo u belo, a dodamo žutu boju srednjem krugu. Crtež snimimo pod imenom TRFFC10B.ICO. Ponovimo ceo postupak, ali sada obojimo gornji krug u crveno, crtež snimimo pod imenom TRFFC10.ICO.
Нема коментара:
Постави коментар