Memilih dengan RadioButton pada Delphi

Desain Form seperti gambar dibawah ini:


RadioButton1

Komponen:

1. Label (Tab Standard)

2. Dua RadioButton (Tab Standard)

Properties:

1. Ubah Caption pada Label menjadi “Jenis Kelamin“.

2. Ubah Caption pada RadioButton1 menjadi “Laki-laki” dan Caption pada RadioButton2 menjadi “Perempuan“.

Kode Program:

1. Masukkan Kode Program berikut pada RadioButton1 

 procedure TForm1.RadioButton1Click(Sender: TObject);
 begin
   ShowMessage('Kamu memilih Laki-laki');
 end;

2. Masukkan Kode Program berikut pada RadioButton2

 procedure TForm1.RadioButton2Click(Sender: TObject);
 begin
   ShowMessage('Kamu memilih Perempuan');
 end;

Jalankan program, hasilnya seperti gambar dibawah ini, jika pilihan laki-laki maka akan menampilkan pesan.

RadioButton2

Download Source Code disini.

Iklan

, , , , , , ,

  1. Tinggalkan komentar

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s

%d blogger menyukai ini: