Tips Mudah Membuat Teks Berjalan Pada Delphi 7

Pada kesempatan kali ini kita akan membahas bagaimana membuat teks berjalan pada Delphi 7, Yuk langsung saja kita simak langkah-langkah di bawah ini:

1. Buka aplikasi Delphi 7

Kursus Komputer Jarak Jauh Via Online di asianbrilliant.com

2. 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.

Kursus Komputer Jarak Jauh Via Online di asianbrilliant.com

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.


Baca Juga TIPS MEMBUAT DATABASE SEDERHANA DENGAN MS.ACCESS 2007
Jika artikelnya bermanfaat, tolong dishare yaa :)