Arsip: [tanya] delete data di dbgrid

more 10 years ago
serif
mau nanya, gimana caranya menghubungkan dbgrid dengan component yang ada di form lain.
jadi ada 2 form, form yang satu untuk meletakkan dbgrid, dan form satunya lagi untuk menginputkan
jadi jika colum dbgrid diklik maka waktu tombol hapus diklik maka data kehapus sesuai colum yang diklik :?:

more 10 years ago
denmasdanang
@serif: mau nanya, gimana caranya menghubungkan dbgrid dengan component yang ada di form lain. jadi ada 2 form, form yang satu untuk meletakkan dbgrid, dan form satunya lagi untuk menginputkan jadi jika colum dbgrid diklik maka waktu tombol hapus diklik maka data kehapus sesuai colum yang diklik :?:apabila tombol hapus diklik melakukan penghapusan record di table ( DB ) maka tinggal lakukan refresh dbgrid pada form1 thx

more 10 years ago
cartrun
mksud km klik dbgrid trus klik button hapus gto bukan.? klau ia maaf nich aku kasih saran dikit memang bisa tapi km asumsikan klau datanya ratusan atau ribuan masa hrus di cari di dbgrid.? maaf mungkin ini saran saya z lebih baik untuk penghapusan data km menggunakan TEdit dengan melakukan pencarian data berdasarkan data yg dimasukan pada TEdit.
oh ia msalah yg mnghubungkan 2 form itu yach.
km tinggal tambahkan
table1.refresh;

more 10 years ago
nasbms
serif:
//Lakukan pencarian data menggunakan query1, datasource DBGrid dari Query1
procedure TForm1.editCariChange(Sender: TObject);
begin
with dm.Query1 do
begin
if editcari.Text <> '' then
begin
Close;
sql.Clear;
sql.Append('select * from tbl_karyawan');
sql.Append('where');
sql.Append('idKaryawan like :kunci');
ParamByName('kunci').AsString := '%'+editcari.Text+'%';
execSql;
close;
open;
//Tuk nampilin data ke form2:
procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
with dm.query1 do
begin
Form2.edit1.Text := FieldValues['idkaryawan'];
Form2.ShowModal;
//Tuk Delete data
procedure TForm2.btnHapusClick(Sender: TObject);
begin
with dm.query2 do
begin
close;
sql.Clear;
sql.Append('delete from tbl_karyawan');
sql.Append('where');
sql.Append(' idKaryawan = :idKaryawan');
ParamByName('idKaryawan').AsString := edit1.Text;
execSql;
dm.Query1.Close; //Query 1 merupakan sql query yg aktif ke tabel, close open disini sebagai refresh tabelnya.
dm.Query1.Open;
Smoga membantu dan maaf jika ada yg salah..
more ...
- Pages:
- 1
reply |
Report Obsolete
Last Articles
Last Topic
- PascalTalk #6: (Podcast) Kuliah IT di luar negeri, susah gak sih?
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #5: UX: Research, Design and Engineer
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #4: Obrolan Ringan Seputar IT
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #2: Membuat Sendiri SMART HOME
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #3: RADically Fast and Easy Mobile Apps Development with Delphi
by LuriDarmawan in Tutorial & Community Project more 2 years ago - PascalTalk #1: Pemanfaatan Artificial Intelligence di Masa Covid-19
by LuriDarmawan in Tutorial & Community Project more 2 years ago - Tempat Latihan Posting
by LuriDarmawan in OOT more 3 years ago - Archive
- Looping lagi...
by idhiel in Hal umum tentang Pascal Indonesia more 10 years ago - [ask] koneksi ke ODBC user Dsn saat runtime dengan ado
by halimanh in FireBird more 10 years ago - Validasi menggunakan data tanggal
by mas_kofa in Hal umum tentang Pascal Indonesia more 10 years ago
Random Topic
- Hapus String dalam file Exe
by avatar_eng in Enginering more 15 years ago - encrypt File Pas
by muktaf in Tip n Trik Pemrograman more 15 years ago - program stok untuk masakan
by mbahdien in Tip n Trik Pemrograman more 15 years ago - link map info ke delphi
by fanni in Hal umum tentang Pascal Indonesia more 16 years ago - Bgmana Cara Embed Form DLL to TTabsheet di Form Pemaggil ?
by henry_sys in Form Enhancement & Graphical Controls more 11 years ago - Menampilkan data currency pada ListView
by percyl in Hal umum tentang Pascal Indonesia more 13 years ago - Cannot result zero
by vandy in Lain-lain more 15 years ago - Trigger Pakai Variabel dan Konstanta ?
by umarbakri in MySQL more 16 years ago - nama file ketika di save bisa di ganti?
by gormet in Kritik & Saran more 16 years ago - media player
by Tfai in Tip n Trik Pemrograman more 14 years ago