Form Master untuk Tabel Pelanggan | Penggunaan DataModule pada Delphi 2010

Tampilan pada DataModule

Buat tabel baru pada database anda dengan field seperti dibawah ini :

Nama tabel : pelanggan
Primary Key : kd_pelanggan

Field	Type	Size
kd_pelanggan	Char	5
nm_pelanggan	Varchar	35
alamat	Varchar	100
no_hp	Varchar	15

Lalu klik kanan pada Project1.exe, pilih "Add New" lalu pilih "Form", lihat gambar dibawah ini:


Maka nanti akan dihasilkan Form3, lakukan desain pada Form3 seperti dibawah ini :

Komponen	Name	Caption
Lable1	Lable1	Data Pelanggan
Lable2	Lable2	Kode Pelanggan
Lable3	Lable3	Nama Pelanggan
Lable4	Lable4	Alamat
Lable5	Lable5	No HP
Edit1-Edit4	Edit1-Edit4	Kosongkan
DBGrid1	DBGrid1
Button1	Button1	&Simpan
Button2	Button2	&Edit
Button3	Button3	&Hapus
Button4	Button4	&Keluar

Masuk ke tab code, ketikkan kode dibawah ini pada bagian Implementation.


Kembali ke tab Design, pilih DBGrid yang ada pada form, dan ubah propertie DataSource dengan memilih DM.DS. (DM adalah nama dari DataModule dan DS adalah nama dari DataSource yang ada pada DataModule).


Setelah itu, kembali lagi ke tab code. Deklarasikan 4 buah prosedure pada bagian privade, seperti dibawah ini


Lengkapi procedure diatas dengan mengetikkan perintah dibawah ini pada bagian Implementation.


Kembali ke Form, pilih Event OnShow lalu Double Klick pada event tersebut dan masuk ke perintah dibawah ini:


Double klick pada Edit1 (Kode Pelanggan), lulu masukkan script dibawah ini :


Dobule klick pada button simpan, kemudian masukkan script dibawah ini :


Double Klick pada button edit dan masukkan script dibawah ini :


Double klick pada button hapus dan masukkan script dibawah ini :


Terakhir Double klick pada button keluar dan masukkan script dibawah ini :




Apabila ada kesalahan atau error, silakan cek lagi program anda dari awal.