Assalamualaikum. wr.wb.
Postingan kali ini saya akan berbagi bagaimana Cara Membuat Teks Berjalan Pada Borland Delphi 7
bagi sobat pencinta delphi7 yang belum tau atau belum paham silahkan perhatikan langkah-langkahnya di bawah, bagi yang sudah senior silahkan di lewat saja :)
OK..... Langsung saja langkah-langkahnya sebagai berikut:
1. Buka aplikasi delphi yg sobat punya bagi yg belum punya silahkan ambil disini.
2. Komponen yang di butuhkan untuk membuat teks berjalan yang sangat sederhana ini adalah:
- Label
- Timer.
3. Dibagian Standar => Label dan simpan di Project => Klik Caption ganti nama sesuka sobat =>lalu Ok.
4. Dibagian System klik komponen timer tersebut lalu simpan di project. komponen timer nya klik 2x lalu masukan Coding dibawah.
Label1.Left:=Label1.Left-5;
if Label1.Left<20 label1.left:="400;</p" then="">
kemudian ganti propertise interval untuk timer dari 1000 menjadi 2(untuk kecepatan teks).
Kalo udah, silahkan tekan Run/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.