Code Untuk Menambahkan Button Tambah ( Add/New Data ) Delphi7 - Hallo sahabat Computer Programmer Medical Coding, Pada Artikel yang anda baca kali ini dengan judul Code Untuk Menambahkan Button Tambah ( Add/New Data ) 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 Tambah ( Add/New Data ) Delphi7
link : Code Untuk Menambahkan Button Tambah ( Add/New Data ) Delphi7

Code Untuk Menambahkan Button Tambah ( Add/New Data ) Delphi7

Berikut ini adalah kode program pada pemrograman delphi7 untuk menambahkan data baru.

Codenya Adalah :

procedure Tformmodifikasi.TTambahClick(Sender: TObject);

begin

formtambah:=TformTambah.create(self);

with formtambah do

begin

edit1.text:='';

edit2.text:='';

edit3.text:='';

edit4.text:='';

edit5.text:='';

caption:='Menambah data';

activeControl:=edit1;

end;

formtambah.showmodal;

if(formtambah.modalresult=mrOk)then

with table1,formtambah do

begin

Append;

FieldbyName('NAME').AsString :=edit1.text;

FieldbyName('CAPITAL').AsString :=edit2.text;

FieldbyName('CONTINENT').AsString :=edit3.text;

FieldbyName('AREA').AsString :=edit4.text;

FieldbyName('POPULATION').AsString :=edit5.text;

Post;

end;

formtambah.free;

end;

Demikianlah Artikel : Code Untuk Menambahkan Button Tambah ( Add/New Data ) Delphi7

Semoga artikel Code Untuk Menambahkan Button Tambah ( Add/New Data ) 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 Tambah ( Add/New Data ) Delphi7 dengan alamat link https://idkingcode.blogspot.com/2016/07/code-untuk-menambahkan-button-tambah.html

Artikel Terkait

Code Untuk Menambahkan Button Tambah ( Add/New Data ) Delphi7

4/ 5

Oleh Unknown

Unknown 10.52 Komentar