Membuat Fungsi-fungsi Program Seperti TDbNavigator

Memakai TDBNavigator seperti yang saya tulis pada Memakai TDbNavigator untuk Memanipulasi Database Access, memang praktis. Namun kurang customize. Tampilannya standar. Itu-itu saja. Icon tombol juga membosankan. Ada suatu cara yang dapat digunakan untuk mengganti fungsi-fungsi TDBNavigator. Keuntungan yang didapat. Anda dapat memakai tombol apa saja, mengganti gambar pada tombol, ataupun memberi warna. Terserah kreatifitas Anda.

TDbNavigator mempunyai sepuluh tombol dengan fungsi dari kanan ke kiri adalah:

1. Pindah ke record pertama
2. Pindah ke record sebelumnya
3. Pindah ke record berikutnya
4. Pindah ke record terakhir
5. Tambah Data
6. Delete (hapus data)
7. Edit (ubah data)
8. Post (mengaktifkan perubahan)
9. Cancel (Batal)
10. Refresh (memperbarui tampilan)

 Jika Anda memakai TAdoTable, maka persamaan fungsi TDbNavigator diatas dengan property TAdoTable adalah sebagai berikut:

1. AdoTable1.First;
2. AdoTable1.Prior;
3. AdoTable1.Next;
4. AdoTable1.Last; 
5. AdoTable1.Append;
6. AdoTable1.Delete;
7. AdoTable1.Edit;
8. AdoTable1.Post;
9. AdoTable1.Cancel;
10. AdoTable1.Refresh;

Untuk mempratekkannya, ikuti langkah-langkah berikut:

1. Tambahkan VCL berikut ke form: TDbGrid, TAdoTable, DataSource, dan 10 TBitBtn
   Contoh:
   
   
2. Isi kode program di masing-masing tombol sesuai dengan daftar padanan dengan TDbNavigator seperti diatas.
3. Hubungkan TDbGrid ke TDataSource
   Contoh:
   DbGrid1.DataSource = DataSource1;
4. Hubungkan TDataSource ke TAdoTable
   Contoh:
   DataSource1.DataSet := AdoTable1;
5. Sambungkan TAdoTable ke database Anda
   Contoh:
   AdoTable1.ConnectionString :=
   "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Belajar Program\Data.mdb;Persist Security Info=False"
6. Aktifkan AdoTable1 dengan mengubah property Active ke TRUE

Membuat Fungsi-fungsi Program Seperti TDbNavigator 2016-02-22T11:12:00+07:00 Rating: 4.5 Diposkan Oleh: Good Dreamer