materi perkuliahan IMK: Membuat Teks Berjalan

Langkah 1 Dengan Borland Delphi 7 :
1. Kemudian buka Borland Delphi 7
2. Langkah Selanjutnya buatlah komponen  Label; dan timer (melalui tab system) sesuka anda
3. Klik 2x pada timer dan masukkan script berikut :

procedure TForm1.Timer1Timer(Sender: TObject);
var a,b,c : String;
begin
a := Panel1.Caption;
  b := copy(a,1,1);
  c := copy(a,2,length(a));
  Panel1.Caption := c+b;


4. Selesai tutorial sekaligus review materi perkuliahan IMK berikut, semoga bermanfaat. terima kasih

5. Link unduh tugas teks berjalan ini : http://www.4shared.com/rar/knQby0Yw/proyek_teks_jalan.html

0 komentar:

Posting Komentar