Belajar Delphi Part 2 #8

andrypein.net : Setelah di postingan pertama kita mengenal sejarah delphi dan mempraktekan program newbie sederhana kita,sekarang mari kita lanjutkan latihannya.

kalo kemarin baru 1 button yang kita pakai,,sekarang kita pakai label dan button oke? ? dan tentunya kita akan membuat aplikasi newbie standar kelas bawah dulu (sama kaya aku ? )

okay mari kita lanjut >>

1. kita mulai dengan menambahkan 3 buah button dan 3 buah label

 

2. hilangkan caption di object inspector pada masing-masing label dan beri caption pada button seperti pada gambar :

 

3. sekarang dobel klik pada komponen button1 dan beri rumus

procedure TForm1.Button1Click(Sender: TObject);
begin
 label1.caption:='Bagaimana perasaanmu ketika belajar Delphi?';
end;

4. dobel klik juga pada komponen button2 dan beri rumus

procedure TForm1.Button2Click(Sender: TObject);
begin
 label2.Caption:='Ternyata mudah banget ya?';
end;

5. dan pada button 3

procedure TForm1.Button3Click(Sender: TObject);
begin
 label1.caption:='';
 label2.caption:='';
end;

6. setelah itu baru di coba jalankan!

dan masih level easy karena saya juga tidak jago2 amat.

(*AFK)