- Beranda
- Komunitas
- Tech
- Programmer Forum
(#Ask) Pembandigan antar Tabel Delphi & Mysql


TS
florimotorcycle
(#Ask) Pembandigan antar Tabel Delphi & Mysql
Mohon izin bertanya dan mohon bantuannya,
tentang pemrograman delphi dengan mysql..
perbandingan antar tabel ada/tidak ada data tabel 1 dengan lainnya
Berikut detailnya :
-----------------------
Nama Database : barang
-------------------------
Tabel 1 : barang1
Field : kdbarang
Tabel 2 : barang2
Field : kdbarang
------------------------
Kompenen di delphi
Untuk simpan ke tabel 1 Komponennya :
Edit1.text
Tombol : Simpan
-------
Untuk simpan ke tabel 2 Komponennya :
Tombol : check
------------
Saya menggunakan kompenen tuk mysql MyDac dan kadang pake Ado
Pertanyaan saya :
Bagaimana kode delphi mengecek antar tabel
Jika tabel 2 (kdbarang) ada/tidak ada,
check dulu tabel1(kdbarang).
Jika tabel 2 (kdbarang) datanya sama dengan tabel1(kdbarang),
maka : ShowMessage('Data sudah ada');
Dan Jika Tabel2(kdbarang) datanya berbeda tabel1(kdbarang)
maka : ShowMessage('Data tidak ada');
Saya sudah pake kode ini di Tombol Check, Tapi apa yang ada di tabel1 tidak masuk ke Tabel2 (Di Tabel 2 hanya berisi data kosong)
Saya bingung, kode delphinya..
Mohon bantuannya, dan terima kasih sebelumnya..
tentang pemrograman delphi dengan mysql..
perbandingan antar tabel ada/tidak ada data tabel 1 dengan lainnya
Spoiler for Penampakan:
Berikut detailnya :
-----------------------
Nama Database : barang
-------------------------
Tabel 1 : barang1
Field : kdbarang
Tabel 2 : barang2
Field : kdbarang
------------------------
Kompenen di delphi
Untuk simpan ke tabel 1 Komponennya :
Edit1.text
Tombol : Simpan
-------
Untuk simpan ke tabel 2 Komponennya :
Tombol : check
------------
Saya menggunakan kompenen tuk mysql MyDac dan kadang pake Ado
Pertanyaan saya :
Bagaimana kode delphi mengecek antar tabel
Jika tabel 2 (kdbarang) ada/tidak ada,
check dulu tabel1(kdbarang).
Jika tabel 2 (kdbarang) datanya sama dengan tabel1(kdbarang),
maka : ShowMessage('Data sudah ada');
Dan Jika Tabel2(kdbarang) datanya berbeda tabel1(kdbarang)
maka : ShowMessage('Data tidak ada');
Saya sudah pake kode ini di Tombol Check, Tapi apa yang ada di tabel1 tidak masuk ke Tabel2 (Di Tabel 2 hanya berisi data kosong)
Spoiler for Kode Tombol Check:
Saya bingung, kode delphinya..
Mohon bantuannya, dan terima kasih sebelumnya..
Diubah oleh florimotorcycle 10-05-2017 18:07


nona212 memberi reputasi
1
940
2


Komentar yang asik ya
Urutan
Terbaru
Terlama


Komentar yang asik ya
Komunitas Pilihan