Ketentuan Soal:
- Isi Form Data
- Klik Tombol Ulangi, maka semua objek dalam keadaan bersih dan kursor berada di Nama
- Klik tombol Kelaur, untuk keluar dari program
Listing code untuk Tombol Ulangidownload source code, file program disini .zip
procedure Tfrm_kesatu.btUlangiClick(Sender: TObject);
begin
//membersihkan objek edit dan combo
eNama.Clear;
cbTempat.Text := 'Tempat Lahir';
mmAlamat.Clear;
rbPagi.Checked := false;
rbSore.Checked := false;
chCpp.Checked := false;
chVB.Checked := false
chFoxpro.Checked := false;
chDelphi.Checked := false;
eNama.SetFocus;
end;
Download File Lengkap + Listing Code disini .pdf