Tutorial Delphi

Input Merupakan Sebuah Proses dimana User Memasukan data ke dalam database. Edit adalah proses memanipulasi data yang sudah ada sedangkan Delete adalah proses menghapus data. Ketiga hal tersebut bisa kita katakan sebagai proses inti dari aplikasi Pengolahan Data.

Jika Pada Postingan Sebelumnya Kita Sudah Membahas Koneksi Database Desktop Ke Delphi, Pada Postingan ini Admin ingin membahas tentang Bagaimana Menginput, Edit dan Menghapus Data Pada Database Desktop Delphi. Jika Anda Belum Paham Bagaimana Mengkoneksikan Database Desktop Ke Delphi Silahkan Baca Panduannya Pada Postingan sebelumnya disini. 

Ceritanya Kita Akan Membuat Aplikasi Sederhana CRUD Data Barang.
Pertama, Untuk Desain Aplikasi-nya Seperti dibawah ini :

Kedua, Buatlah Database-nya. Saya Kira Jika Anda Sudah Mempelajari Postingan Sebelumnya Bagian Ini Tidak akan ada masalah.

Ketiga, Mari Kita MengCoding :
1. Klik Dua Kali Pada Button Simpan Lalu Masukan Code ini :

Table1.Append;
Table1.FieldByName('KodeBarang').AsString:=Edit1.Text;
Table1.FieldByName('NamaBarang').AsString:=Edit2.Text;
Table1.FieldByName('JumlahBarang').AsString:=Edit3.Text;
Table1.FieldByName('HargaBeli').AsString:=Edit4.Text;
Table1.FieldByName('Keterangan').AsString:=Edit5.Text;
Table1.Post;

2. Masukan Kode ini dalam Button Edit

// Misal Mau Edit Nama Barang
Table1.Edit;
Table1.FieldByName('NamaBarang').AsString:=Edit2.Text;
Table1.Post;

Penjelasan tentang Coding edit diatas; Isi Field NamaBarang yang ada di Database akan diganti dengan nilai dari Edit2.Text; Jadi Pastikan Isi Edit2.Text tidak kosong.

3. Masukan Kode ini dalam Button Hapus

Table1.Delete;

4. Masukan Kode ini dalam Button Batal

Table1.Cancel;

Untuk Hasil Akhir Saya Seperti Ini :