Sabtu, 31 Maret 2012

Program Delphi Sederhana


Delphi programming kali ini akan dibahas mengenai bagaimana membuat sebuah program perkenalan sederhana.
Hal yang perlu disiapkan adalah sudah pasti komputer/laptop sudah terinstal Borland Delphi 7, sedikit cemilan dan secangkir kopi mungkin akan menambah kenikmatan didalam proses belajar hehehehe…
Ok langsung aja kita mulai :
1. Untuk membuat project baru, klik File >> New >> Application. Kemudian tambahkan 2 buah Label, 2 buah Edit dan 2 buah Button.
Setting properties masing-masing objek :
Label1 | Caption : Masukkan Nama
Label2 | caption : Masukkan NIM
Edit1 | Name : Enama
Text : dikosongkan/dihapus
Edit2 | Name : Enim
Text : dikosongkan/dihapus
Button1 | Name : Btampil
Caption : &Tampil
Button2 | Name : Bkeluar
Caption : &Keluar
Delphi programming kali ini akan dibahas mengenai bagaimana membuat sebuah program perkenalan sederhana.
Hal yang perlu disiapkan adalah sudah pasti komputer/laptop sudah terinstal Borland Delphi 7, sedikit cemilan dan secangkir kopi mungkin akan menambah kenikmatan didalam proses belajar hehehehe…
Ok langsung aja kita mulai :
1. Untuk membuat project baru, klik File >> New >> Application. Kemudian tambahkan 2 buah Label, 2 buah Edit dan 2 buah Button.
Setting properties masing-masing objek :
Label1 | Caption : Masukkan Nama
Label2 | caption : Masukkan NIM
Edit1 | Name : Enama
Text : dikosongkan/dihapus
Edit2 | Name : Enim
Text : dikosongkan/dihapus
Button1 | Name : Btampil
Caption : &Tampil
Button2 | Name : Bkeluar
Caption : &Keluar
2. Klik 2x/double klik pada objek tombol Tampil, berikan listing dibawah ini.
procedure TForm1.Button1Click(Sender: TObject); begin showmessage ('Nama saya ' + enama.Text + ' nim saya ' + enim.Text + ''); end;
3. Kemudian klik 2x pada objek tombol Keluar, tambahkan listing berikut.
procedure TForm1.BkeluarClick(Sender: TObject); begin if (application.MessageBox('Menutup aplikasi ?','Pesan',mb_okcancel)=idok) then close; end;
Description: http://i893.photobucket.com/albums/ac137/local_avenue/Program%20Perkenalan%20Delphi/1.jpg

0 komentar:

Posting Komentar