Sabtu, 18 September 2010
Euumm..sekarang saya akan membuat teks berjalan, penting ga sich nempelin teks berjalan itu pada program??
Ya..itu mah terserah anda2 sekalian, jikalau ingin membuat tampilan program anda lebih bagus dan menarik ya tambahkan saja teks berjalan ini, kalau ngga...Whatever lah..
Oke ni cara and langkah - langkahnya..
1 => Buka aplikasi Delphi 7 nya dulu
2 => Masukan Label dan Timer (berada di komponen System)
3 => Ubahlah
:
Label1 <=> ubah captionnya dengan nama yang anda inginkan
Panel1 <=> hapus captionnnya
Timer <=> ubah nilai intervalnya menjadi 5
4 => Letakan label di dalam panel, bukan di luar panel
5 => klik 2x pada Timer sehingga akan muncul tampilan untuk memasukan scripnya..
masukan scrip di bawah ini..
Label1.left:= Label1.left-1;
if (Label1.left + Label1.Widht) <=0 Then
Label1.left:= Panel1.Widht;
6 => Lalu tekan F9
Selamat Mencoba. . .
Ya..itu mah terserah anda2 sekalian, jikalau ingin membuat tampilan program anda lebih bagus dan menarik ya tambahkan saja teks berjalan ini, kalau ngga...Whatever lah..
Oke ni cara and langkah - langkahnya..
1 => Buka aplikasi Delphi 7 nya dulu
2 => Masukan Label dan Timer (berada di komponen System)
3 => Ubahlah
:
Label1 <=> ubah captionnya dengan nama yang anda inginkan
Panel1 <=> hapus captionnnya
Timer <=> ubah nilai intervalnya menjadi 5
4 => Letakan label di dalam panel, bukan di luar panel
5 => klik 2x pada Timer sehingga akan muncul tampilan untuk memasukan scripnya..
masukan scrip di bawah ini..
Label1.left:= Label1.left-1;
if (Label1.left + Label1.Widht) <=0 Then
Label1.left:= Panel1.Widht;
6 => Lalu tekan F9
Selamat Mencoba. . .
Langganan:
Posting Komentar (Atom)


2 komentar:
DAPET DARI MANA NICH????? NULIS WIDTH AJA GA BECUS!!!
biasa lah....namanya jg manusia pasti lupa..hrs nya lu trima kasih pretttt
Posting Komentar