Cara Membuat Tulisan Berjalan atau Bergerak di Delphi 7

Pada postingan kali ini, saya akan membagikan tutorial membuat teks bergerak atau berjalan dengan menggunakan aplikasi Borland Delphi 7. Biasanya tulisan berjalan ini dapat kita jumpai di televisi, website sampai di tempat umum seperti pusat perbelanjaan, jalan raya, dan supermarket. Fungsi running text sendiri ialah sebagai penyampaian informasi, media iklan, dan peringatan.

Untuk membuat text berjalan di Delphi 7 ini caranya sederhana dan mudah untuk diikuti. Perhatikan tutorialnya di bawah ini:

1. Buka aplikasi Delphi dengan menggunakan laptop/PC/komputer.

2. Klik “standard” lalu klik “A” sebanyak dua kali guna memunculkan kolom untuk menambah tulisan yang nantinya akan dijadikan running text. 

3. Setelah diklik “A” sebanyak dua kali, maka akan muncul “Label1” di form1.

4. Lalu klik label1 tersebut dan perhatikan pada kotak di pojok kiri bawah, yakni Object Inspector. Pada object inspector, klik “Properties” lalu klik “Caption” untuk mengubah tulisan Label1 menjadi tulisan yang nantinya akan dibuat berjalan. 

5. Setelah mengubah caption, maka tulisan label1 akan berubah. Sebagai contoh, pada tutorial ini saya membuat tulisan thank you. Jadi, tulisan label1 akan berganti menjadi tulisan thank you.

6. Tulisan thank you ini atau tulisan yang akan teman-teman buat dapat diubah warnanya, ukuran, dan juga jenis fontnya. Caranya sangat sederhana, yakni pada bagian properties klik “Font” lalu klik titik tiga di samping tulisan “(TFont)”.

7. Setelah diklik “titik tiga” tersebut akan muncul tampilan seperti di bawah. Teman-teman dapat mengkreasikan warna, ukuran, dan font tulisan sesuai keinginan atau tidak diubah sama sekali juga tidak apa-apa. 

8. Selanjutnya klik “System” yang terletak di samping kanan standard lalu klik simbol jam sebanyak dua kali. Simbol jam ini disebut timer yang bertujuan untuk mengatur suatu prosedur atau fungsi yang dijalankan pada interval waktu tertentu. Sebenarnya, sebagaimana fungsi timer pada umumnya, pada delphi ini timer juga berfungsi untuk mengatur waktu.

9. Setelah simbol jam di klik sebanyak dua kali, maka akan tampak tampilan seperti di bawah ini.Tulisan thank you di bawah ini tidak sama dengan gambar pada langkah 5 sebab sudah diubah font, ukuran, dan warnanya sesuai langkah nomor 7.

10. Kemudian timer tersebut diklik sebanyak dua kali lalu masukkan kode di bawah ini:

label1.Left := label1.left-100;

if label1.Left <1 then label1.left:=500

CATATAN: Angka 100 dan 500 yang ada pada kode di atas dapat diganti sesuai kehendak teman-teman. Kode diletakkan setelah “begin” dan sebelum “end;”.

11. Klik “File” yang terletak di pojok kanan atas lalu klik “Save All” dan tentukan lokasi penyimpanan untuk menyimpan program running text Delphi yang telah teman-teman buat.

12. Setelah project disimpan selanjutnya klik run (yang memiliki simbol seperti gambar di bawah) untuk melihat hasilnya.

13.  Setelah di run, maka program akan muncul seperti gambar di bawah ini dengan tulisan thank you yang berjalan dari kanan ke kiri. Karena ini gambar jadi tulisan thank you nya tidak bisa terlihat berjalan wkwk.

Demikian cara membuat teks berjalan atau running text dengan menggunakan Borland Delphi 7. Terima kasih, selamat mencoba dan semoga bermanfaat....