Input, Update dan Delete Pada Database MySQL
Sebelumnya Admin Sudah Membahas Bagaimana Koneksi Antara Database MySQL
dengan Delphi. Jika Anda Belum Membacanya, Silahkan Disini!! Selanjutnya
Pada Postingan Ini, Admin Mau Melanjutkan Postingan Tersebut. Setelah
Kita Bersama-sama Belajar Bagaimana Koneksi Delphi dengan Database Ke
MySQL, Admin Mau Sharing Sedikit Pengetahuan tentang Bagaimana Input,
Edit dan menghapus data Dalam Database MySQL. Singkat Kata Kita Akan
Membuat Sebuah Aplikasi Sederhana CRUD Data Buku.
Pertama, Untuk Desain Aplikasinya Seperti Ini :
Kedua, Silahkan Membuat Database. Tentu Anda Sudah Paham Jika Membaca Postingan Sebelumnya.
Ketiga, Silahkan Dikoneksikan. Lagi Lagi Tentang Cara Mengkoneksikan ada Pada Postingan Sebelumnya.
Keempat,
Masukan Code ini dalam Buttom Simpan :
ADOQuery1.Append;
ADOQuery1.FieldByName('Nomor').AsString:=Edit1.Text;
ADOQuery1.FieldByName('Judul').AsString:=Edit2.Text;
ADOQuery1.FieldByName('Pengarang').AsString:=Edit3.Text;
ADOQuery1.FieldByName('Penerbit').AsString:=Edit4.Text;
ADOQuery1.FieldByName('TahunTerbit').AsString:=Edit5.Text;
ADOQuery1.Post;
Masukan Code ini dalam Buttom Hapus :
ADOQuery1.Delete;
Masukan Code ini dalam Buttom Batal :
ADOQuery1.Cancel;
Masukan Code ini dalam Buttom Edit :
ADOQuery1.Post;
Untuk Hasil Akhir Saya Seperti Ini :
Selamat Mencoba. Silahkan di Kembangkan Sendiri.. ;)
Pertama, Untuk Desain Aplikasinya Seperti Ini :
Kedua, Silahkan Membuat Database. Tentu Anda Sudah Paham Jika Membaca Postingan Sebelumnya.
Ketiga, Silahkan Dikoneksikan. Lagi Lagi Tentang Cara Mengkoneksikan ada Pada Postingan Sebelumnya.
Keempat,
Masukan Code ini dalam Buttom Simpan :
ADOQuery1.Append;
ADOQuery1.FieldByName('Nomor').AsString:=Edit1.Text;
ADOQuery1.FieldByName('Judul').AsString:=Edit2.Text;
ADOQuery1.FieldByName('Pengarang').AsString:=Edit3.Text;
ADOQuery1.FieldByName('Penerbit').AsString:=Edit4.Text;
ADOQuery1.FieldByName('TahunTerbit').AsString:=Edit5.Text;
ADOQuery1.Post;
Masukan Code ini dalam Buttom Hapus :
ADOQuery1.Delete;
Masukan Code ini dalam Buttom Batal :
ADOQuery1.Cancel;
Masukan Code ini dalam Buttom Edit :
ADOQuery1.Post;
Untuk Hasil Akhir Saya Seperti Ini :
Selamat Mencoba. Silahkan di Kembangkan Sendiri.. ;)
makasih kak..
ReplyDeletesangat membantu codingnya :D