MODUL XIV PEMROGRAMAN DENGAN DATABASE III (Query dan SQL) I. MAKSUD DAN TUJUAN A. MAKSUD Mempraktekan cara-cara pemrograman visual dengan Builder dan menyimpan ke database.
menggunakan C++
B. TUJUAN Memberikan kemampuan memprogram dengan menggunakan komponen table, sql/query, merancang struktur tabel dengan Database Desktop, Nama Alias, dan lanjutan dari modul sebelumnya. II. TEORI Pencarian pengurutan data dengan menggunakan SQL. Cara lain menggunakan pencarian data dengan perintah Locate, dan untuk menyimpan dengan menggunakan Query. Perintah Query atau SQL terdiri dari : CREATE TABLE; membuat tabel, SELECT : menampilkan isi record, INSERT : menambah isi record, UPDATE : memperbaharui record tertentu, dan DELETE untuk menghapus. III. PRAKTEK Buka kembali modul sebelumnya buka project pada modul 13 yaitu project13.bpr. Tambahkan pada project di atas dengan perintas New Form atau pada menu tool bars pilih ikon , untuk menambah Form baru yaitu From2. Lakukan seperti rancangan di bawah: Tabel 14.1 Set properti untuk rancangan gambar 14.1 Komponen Form Table
Query Button BitBtn
Properi Name Caption Name DatabaseName TableName Active Name DatabaseName Name Caption Name Caption ModalResult
Nilai Form3 Edit Data Tabel1 DATAKU Bagian.db Treu Query1 DATAKU ButtonCek Cek BitBtnSimpan &Simpan mrNone
Modul Praktikum Bahasa Pemprograman C++ Builder
74
Gambar 14.1. Rancangan Form untuk edit Ketika kode akan diisi maka langkah selanjutnya akan dicek menekan tombol Cek, jika ada akan tampilkan, maka masukkan kode berikut : !" Klik pada Tombol Cek !" Object Inspector pilih tab Event !" Tekan klik ganda OnClick !" Masukkan program berikut : void __fastcall TForm3::ButtonCekClick(TObject *Sender) { Table1->Open(); TLocateOptions Cari; Cari.Clear(); Cari << loPartialKey; if (Table1->Locate("KODEBAG",EditKode->Text,Cari)) EditBagian->Text =Table1->FieldByName("BAGIAN")->AsString; else if (Application->MessageBox("Data Tidak ada..............", "Perhatian", MB_OK) == IDOK) { Kosongkan(); EditKode->SetFocus(); return; } }
Ketika kode dan nama akan diisi, maka langkah selanjutnya akan disimpan untuk update, dengan menekan tombol Simpan maka masukkan kode berikut : !" Klik pada Tombol Simpan !" Object Inspector pilih tab Event !" Tekan klik ganda OnClick !" Masukkan program berikut : void __fastcall TForm3::BitBtnSimpanClick(TObject *Sender) { Query1->Close(); Query1->SQL->Clear(); Query1->SQL->Add("UPDATE BAGIAN"); Query1->SQL->Add("SET KODEBAG='"+EditKode->Text+"'"); Query1->SQL->Add(",BAGIAN ='"+EditBagian->Text+"'"); Query1->SQL->Add("WHERE KODEBAG='"+EditKode->Text+"'"); Query1->ExecSQL(); ShowMessage(AnsiString("Data Sudah Terupdate................."));
Modul Praktikum Bahasa Pemprograman C++ Builder
75
Kosongkan(); EditKode->SetFocus(); }
Program kosongkan adalah untuk mengosongkan isian pada saat selesai penyimpanan : void TForm3::Kosongkan() { EditKode->Text =""; EditBagian->Text =""; }
Ketika kita mempunyai 3 Form kalau kita ingin manjalankan maka baisanya form yang pertama adalah form yang aktif. Pada contoh ini, terdapat 3 Form, Form1, Form2, Form3. Otomatis Form1 yang akatif. Untuk mengaktifkan supaya Form2 yang menjadi Form utama adalah dengan lankah-langkah sebagai berikut : !"Pilih Menu Project !"Option … !"Lihat gambar 14.2 !"Pada Dalog Project Option !"Pilih tab Form !"Pada Combo Main form pilih Form3. !"(Form3 sebagai Form utama) !"Pada saat di Run akan tampil didepan. !"Lihat gambar 14.3
Gambar 14.2. Project Option
Modul Praktikum Bahasa Pemprograman C++ Builder
76
Gambar 15.3. Dialog Project Option Uji program dengan teka F9
Gambar 14.4. Pesan jka data tidak ditemukan Application->MessageBox("Data Tidak ada..............", "Perhatian", MB_OK) == IDOK) adalah fungsi untuk menampilkan pesan seperti gambar 14.4.
Bisa juga mengunakan funsi : ShowMessage(AnsiString("Data Sudah Terupdate.................")); (lihat gambar 14.5.
Modul Praktikum Bahasa Pemprograman C++ Builder
77
Gamber 14.5. Pesan ketika data diupadate IV. TUGAS Buatlah dengan cara yang sama untuk menghapus data dengan menggunakan seperti rancangan yang ada. Sebelum dihapus buatlah fungsi pesan “Banar data ini akan dihapus” dangan dua tombol “Yes”, “No”
Modul Praktikum Bahasa Pemprograman C++ Builder
78
