Arsip: Membuat DBNavigator dgn TAction

Sebenarnya ada trik yang sangat mudah yang bisa digunakan untuk membuat berbagai macam tombol Navigasi yang menarik dengan memanfaatkan komponen Delphi yang sudah ada, bahkan tidak perlu mengetikan sebaris kodepun untuk membuat berbagai macam tombol yang mempunyai karakteristik sama dengan DBNavigator.
Berikut langkah-langkah membuat Action Dataset yang bisa dimanfaatkan utnuk membuat Navigasi Dataset.
1. Insert Komponen Actionlist dari [palete Standar]
2. Double Klik, pilih New standard Action.
3. Pilih Semua Tdataset Action, dan sekarang Action sudah siap digunakan.
Mudah bukan... Sekarang hanya tinggal kreatifitas Anda dlm membuat berbagai macam image yang menarik untuk menghiasi komponen-komponen dari kelas TBitbutton dan TspeedButton.
Ubahlah Properti Action dari TButton ini dan isikan dari daftar Tdataset Action yang sebelumnya telah dibuat.
Pilihlah jenis action state sesuai dengan keperluanya seperti Action First, Prior, Next, Last dll.
TButton sekarang sudah menjadi DBNavigator Button

Keuntungan menggunakan TAction dataset:
1.Pada penggunaan Pagecontrol, Anda tidak perlu mengatur properti Datasource untuk berpindah2 lebih dari 1 Datasource , Dataset Action secara otomotis mengenali datasource yang sedang aktif, shg tidak dibutuhkan sama sekali pengetikan kode program untuk mengubah perpindahan property datasource. Hal yang tidak bisa dikerjakan oleh DBNavigator, walaupun bisa membutuhkan penulisan kode program.
2.Kondisi state pada Tdataset otomatis berpengaruh pada Tdataset Action, shg jika dataset kita dalam kondisi dsinsert, otomatis Tbutton yang kita gunakan dengan Tdataset Action insert otomatis menjadi disable (sama dengan perubahan state DBNavigator)
3. Selain diaplikasikan pada komponen Tbutton, actionlist ini bisa diaplikasikan pada Tmenu dan Tpopupmenu.

End.