[DELPHI] Membuat Running Text

Hallooo friend.

kali ini ane akan berbagi postingan tentang cara2 membuat running text / text yang berjalan .

Cekidot !!!!

1. Langkah  Buka Delphi
2. Buatlah sebuah Form baru : Klik Menu File> New > pilih FormApplication.

3. Masukkan sebuah komponen Label dan sebuah komponen Panel pada palette standar ke dalam Form.

Penempatan Label 1 dan Panel 1

4. Pastikan letak komponen Label berada diatas komponen Panel agar teks yang berjalan tidak keluar dari batas        

     komponen panel.

5. Masukkan sebuah komponen Timer pada paletteSystem ke dalam form :

6. Double klik pada komponen Timer,  maka akan keluar halaman editor Code, 

7. Ketikkan Kode berikut pada prosedur Timer1 :

Sintak

8. Pastikan syntak yang  Anda tulis benar benar.

9. Maka jadilah program Running Teks, dan coba untuk running dengan cara F9 atau klik tombol Play.

Okee , sekian postingan dari ane kali ini , ,,, see you ,   :)