Contoh Coding Tombol Simpan Delphi 7

1. Double Klik Button Simpan Yang telah di buat sebelumnya
2. Simpan Kode Ini Di dalamnya
//Kode simpan
table1.Append;

table1 ['NIP'] := Edit1.Text;
table1 ['Nama'] := edit2.Text;
table1 ['Tanggal_lahir'] := edit4.Text;
table1 ['alamat'] := edit3.Text;
table1 ['No_telp'] := edit5.Text;

table1.Post   ;
//Kode agar T edit bersih kembali stelah simpan
 Edit1.Text:='';
  Edit2.Text:='';
   Edit3.Text:='';
    Edit4.Text:='';
     Edit5.Text:='';
// kode agar Kursor berada di edit 1 setelh simpan
 Edit1.SetFocus;