Contoh Coding Tombol Hapus Delphi 7

1. Double klik pada tombol yang telah di buat sebelumnya

2. masukan kode ini di antara begin dan end


//kode konfirmasi penghapusan
if messagedlg('yakin akan dihapus??', mtconfirmation,
[mbyes,mbno],0)=mryes then
//penghapusan
table1.Delete;
table1.Refresh;
end;


--------------------
ket  :
Table1 : nama tabel yang anda gunakan ( entah itu menggunakan BDE atau ADO)