Kamis, 13 Desember 2012
Membuat Teks Berjalan Pada Delphi 7
Saya akan berbagi yaitu gimana cara
membuat teks berjalan pada Borland Delphi 7
Ok ! Langsung saja....
Pertama Anda buka aplikasi delphi,
Selatah 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.
Mudah-mudahan bermanfaat.
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.
Mudah-mudahan bermanfaat.
0 Comments:
Langganan:
Posting Komentar (Atom)