Fungi Perkalian Pada Delphi

var  Form1: TForm1;a,b,c:real;implementation{$R *.dfm}procedure TForm1.Edit2Change(Sender: TObject);begina:=StrToIntDef(DBEdit1.Text,0);b:=StrToIntDef(Edit2.Text,0);c:=a*b;Edit3.Text:=FloatToStr(c);if Edit2.Text='' thenShowMessage('data harus di isi');Form1.Refres...

Read More

Fungsi Filter Pada Delphi

Berikut  ini admin kembali memposting fungsi Filter data dengan Delphi __________________________________________________ Begin ADOQuery1.SQL.Clear;if RadioGroup1.ItemIndex=0 then      ADOQuery1.SQL.Text:='select * from siswa where nis LIKE"'+Edit1.Text +'%"'else        ADOQuery1.SQL.Text:='select * from siswa where nama_siswa LIKE"'+Edit1.Text +'%"';  ADOQuery1.Open;End. ________________________________________________...

Read More

Form Login

Berikut ini Fungsi Login Form +++++++++++++++++++++++++++++++++++++++++++++++++++++++ Normal 0 false false false EN-US X-NONE X-NONE MicrosoftInternetExplorer4 ...

Read More

Kegiatan Ekstrakurikuler

SMK Keling Kumang menyelengarakan berbagai kegiatan Ekstra kurikuler. hal ini dilakukan untuk memberikan tempat bagi seluruh siswa-siswa dalam menyalurkan bakat dan minat mereka, adapun kegiatan ekstra yang di selenggarakan antara lain: Sepak Bola Bola Volley Tenis meja bulu tangkis catur Band Tari modern Tari daerah Beladiri Shorinji Kempo Melukis Mading Teater PMR Pramuka Paskib Pertanian Web Blog  Pemrograman Bahasa Inggris Matematika Kerajinan Tangan Paduan Suara Praktek Sore simulasi Kasir, Pelayanan pada Nasabah mengunakan Aplikasi dan...

Read More

Prestasi SMK Keling Kumang awal tahun

SMK keling kumang mengawali Tahun ajaran 2016/2017 dalam 4 bulan terakhir sudah meraih 16 piala dari berbagai cabang Olah raga dan kegiatan lainnya. dan berikut ini sebagian dokumentasi prestasi tersebut juara 2 LPI kabupaten sekadau  4 pala dari cabang Seni dan 4 pala lagi dari cabang seni  ...

Read More