Jika kita ingin membuat suatu animasi seperti ini maka yang perlu diperhatikan adalah TIMER atau pewaktu,
ada beberapa jenis / istilah yang perlu diperhatikan guna kelancaran berlangsungnya suatu program.
- Timer Minus
Adalah timer yang memindahkan suatu obyek ke atas / mundur (obyek = komponen yang terlihat pada form) dan nilainya minus
contoh :
procedure TForm1.Timer1Timer(Sender: TObject);
begin
panel1.left:=panel1.left - 1
if panel1.left<=-100 then
panel1.left:=100
end;
yang artinya : mundurkan panel 1 hingga posisi koordinat -100 (di luar form) , jika posisinya kurang dari atau sama dengan - 100 maka kembalikan panel1 ke posisi koordinat 100
begitu seterusnya, dan ini yang dinamakan pengulangan atau looping ini baik, tetapi tidak bagus untuk komputer dengan kecepatan rendah
========================================================================================================== - Timer Plus:
Adalah timer yang memindahkan suatu obyek ke bawah / maju (obyek = komponen yang terlihat pada form) dan nilainya non-minus ( beda dengan plus, kalau plus itu sepert "progressbar1.position+1")
contoh :
procedure TForm1.Timer1Timer(Sender: TObject);
begin
panel1.left:=panel1.left + 1 // ini contoh 'nilai plus'
if panel1.left>=150 then
panel1.left:=0
end;
yang artinya : majukan panel 1 hingga posisi koordinat 100 (di tepi kanan form) , jika posisinya lebih dari atau sama dengan 150 maka kembalikan panel1 ke posisi koordinat 0
begitu seterusnya, dan ini yang dinamakan pengulangan atau looping ini baik, tetapi tidak bagus untuk komputer dengan kecepatan rendah
========================================================================================================== - Timer Pasif :
Timer yang mengubah atau mengupdate suatu bagian dari suatu obyek komponen secara berkala, dan terus memperbarui hingga user menghentikannya , contoh :
procedure TForm1.Timer1Timer(Sender: TObject);
begin
memo1.lines.add('a');
end;
yang artinya lakukan perintah tulis huruf a pada komponen memo, secara terus menerus karena user tidak memberi tahu kapan operasi ini akan dihentikan.
========================================================================================================== - Timer Aktif :
Timer yang dipakai untuk prosedur yang berulangkali dilakukan/ loop (perulangan), timer di set dengan menggunakan blok if... then dan kita menentukan berapa lama delay / tunda pada proses looping itu.
========================================================================================================== - Timer Switch :
Timer yang dipakai untuk melakukan switch , timer yang mengerti kapan saat suatu fitur / tombol / komponen diaktifkan maupun dimatikan , dengan memberi / Mengesetnya memakai if...Then
==========================================================================================================

Tidak ada komentar:
Posting Komentar