Code Untuk Menambahkan Button Hapus ( Delete ) Delphi7 - Hallo sahabat Computer Programmer Medical Coding, Pada Artikel yang anda baca kali ini dengan judul Code Untuk Menambahkan Button Hapus ( Delete ) Delphi7, kami telah mempersiapkan artikel ini dengan baik untuk anda baca dan ambil informasi didalamnya. mudah-mudahan isi postingan Artikel Delphi, yang kami tulis ini dapat anda pahami. baiklah, selamat membaca.

Judul : Code Untuk Menambahkan Button Hapus ( Delete ) Delphi7
link : Code Untuk Menambahkan Button Hapus ( Delete ) Delphi7

Code Untuk Menambahkan Button Hapus ( Delete ) Delphi7

Berikut dibawah ini adalah kode untuk menambahkan button Hapus pada pemrograman delphi7.
 
Codenya adalah :

procedure Tformmodifikasi.ThapusClick(Sender: TObject);

Var

S : Array [0..255]of char;

begin

StrPCopy(S, Format('Anda Yakin Negara %s dihapus?', [table1.fields[0].AsString]));

if (Application.MessageBox(S,'Peringatan',MB_YESNO or MB_ICONQUESTION)=IDYES)then

{menanyakan apakah benar akan di hapus}

table1.Delete ;

end;

Demikianlah Artikel : Code Untuk Menambahkan Button Hapus ( Delete ) Delphi7

Semoga artikel Code Untuk Menambahkan Button Hapus ( Delete ) Delphi7 ini, bisa memberi manfaat untuk anda semua dan jangan bosan untuk datang kembali mengunjungi blog ini. Baiklah, sampai jumpa di postingan artikel lainnya.

Artikel yang anda baca saat ini Code Untuk Menambahkan Button Hapus ( Delete ) Delphi7 dengan alamat link https://idkingcode.blogspot.com/2016/07/code-untuk-menambahkan-button-hapus.html

Artikel Terkait

Code Untuk Menambahkan Button Hapus ( Delete ) Delphi7

4/ 5

Oleh Unknown

Unknown 10.48 Komentar