membuat program sederhana dengan delphi 7

 

Double klik pada button1..... yaitu tombol BARU kltik sintak dibawah ini :

Edit1.text  := clear;

Edit2.text  := clear;

Edit3.text  := clear;

Double klikpa datombol simpan :

Adotable1.Append;

Adotable1nip.asstring := edit1.text;

Adotable1nama.asstring := edit2.text;

Adotable1alamat.asstring := edit3.text;

Adotable1.post;

Double klik pada tombol perbaiki :

Adotable1.edit;

Adotable1nama.asstring := edit2.text;

Adotable1alamat.asstring := edit3.text;

Adotable1.post;

Double klik pada tombol hapus :

Adotable1.delete;

Double klik pada tombol keluar :

Close;