Membuat Animasi Label Gerak di Delphi

Kali ini masih membahas animasi,setelah dulu dibahas mengenai LABEL BERGERAK dalam VB
Sekarang kita bahas untuk versi delphinya.Untuk lebih jelasnya silahkan ikuti langkah-langkahnya…
Caranya :
1. Buat form yang terdiri dari 3 objek komponen

1 buah Label
1 buah Panel
1 buah Timer

2. Dan atur properties dari timer. Ubah intervalnya menjadi 5,yang awalnya 1000
maksud properties interval adalah berfungsi untuk mengatur penundaan eksekusi program yang sedang berjalan atau running. Jika nilai yang ada dalam properties interval semakin diperkecil, kecepatan pergerakan animasi akan semakin cepat. untuk 1 detiknya diwakili dengan angka 1000
3. Setelah diatur seperti diatas, double klik komponen timer untuk memberikan kode tambahan.
4. Tambahkan kode seperti dibawah ini

5. Running aplikasi dengan menekan tombol F9, dan lihat hasilnya
Selamat Mencoba. . .