Prev Next Up Title Contents Index

Timer - ajastetut tapahtumat


Lisätään vaikkapa aluksi auton kuva, joka ajaa ruudun vasemmasta laidasta oikeaan laitaan.

1.
Lisää Image-komponentti ruudun vasempaan alalaitaan (löytyy additional sivulta).
2.
tuplaklikkaa Image- komponenttia ja lataa siihen vaikkapa kuvaksi hauto.bmp.
3.
nyt kannattaa laittaa AutoSize- ominaisuus päälle
4.
vaihda komponentin nimeksi vaikkapa ImageHA.
Jotta auton kuva liikkuisi, pitäisi ImageHA- olion paikkaa muuttaa tietyn välein. Tietyn aikavälein tapahtuvia tapahtumia saadaan Timer- komponentilta.
1.
Lisää lomakkeelle mihin tahansa kohtaan Timer- komponentti (löytyy system sivulta). Paikalla ei ole väliä, koska komponentti EI ole näkyvissä ohjelman ajon aikana.
2.
vaihda nimeksi vaikkapa TimerHA
3.
vaihda tapahtumaväliksi esim 100 (=100 ms).
4.
tuplaklikkaa ajastinta ja lisää koodi- ikkunaan koodi:
	procedure TAutolaskuri.Timer1Timer(Sender: TObject);
	begin
	  ImageHA.Left := ImageHA.Left + 1;
	end;

Tehtävä 1.2 Edestakaisin

Muuta ohjelmaa siten, että auton kuva kulkee ruudussa edestakaisin.


Prev Next Up Title Contents Index