Pertama : Buka aplikasi delphi
Setelah itu, komponen yang di
butuhkan untuk membuat teks berjalan yang sangat sederhana ini adalah Label dan
Timer.
Label ini ada di bagian standard,
untuk Timer ada di bagian System.
Kemudian buatlah desain form seperti
dibawah ini ato terserah Anda mau seperti apa.
Setelah itu, klik 2x komponen timer
tersebut, dan isi dengan kode dibawah ini :
Label1.Left:=Label1.Left-5;
if Label1.Left<20 then
Label1.Left:=400;
kemudian ganti propertise interval
untuk timer dari 1000 menjadi 2(untuk kecepatan teks).
Kalo udah, silahkan tekan F9 untuk
menjalankannya, dan lihat hasilnya.
setelah selesai menulis coding diatas, perhatikan interval yang ada dipropertis timer 1,
Perhatian
lagi, semakin kecil nilai interval semakin cepat teks tersebut
berjalan, dan sebaliknya semakin besar nilai intervalnya semakin lambat
teks tersebut berjalan.
Tidak ada komentar:
Posting Komentar