Tutorial PBO
A.
Membuat database.
Cara-caranya :
1.
Buka aplikasi Access nya,
->klik all program->program file. Tampilan awal Access :
Klik
disini untuk membuat database baru
|
|
2.
Setelah Create a new file, maka
klik Blank Database, seperti gambar di bawah ini:
3.
Maka akan tampil sebuah kotak
dialog untuk penyimpanan database yang kita buat, tentukan nama data base nya,
misal; dbmaha. Kemudian pilih lokasi tempat penyimpanan file database tersebut
dan pilih create, misalnya di D:/latihan PBO/... seperti gambar di bawah:
Pada
Create table in Design view, klik kanan untuk membuat table nya, Pilih
Design View. Seperti tampilan berikut :
|
|
Maka akan tampil layar seperti berikut,
4.
Maka akan tampil layar seperti di
bawah ini :
5.
Langkah berikut nya adalah membuat
fild name dari data base nya dan menentukan tipe data dari fild namenya, dalam
kasus ini kita akan membuat database mahasiswa, artinya kita memerlukan
beberapa file tentang mahasiswa, seperti Nim, Nama, Alamat, dan Jurusan.
Caranya, isi Fild Name yang ada pada Table Design View, dan sesuaikan tipe
datanya sesuai kebutuhan, Hasilnya seperti gambar berikut :
Setelah
Filenama ditentukan, maka berikutnya kita tentukan Primary Key dari Table
yang kita buat, dalam kasus ini yang jadi primary key nya adalah nim,
karena antara satu mahasiswa pasti memiliki Nim yang berbada. Cara nya
seperti berikut :
|
|
|
|
Jika
table tersebut telah diberi primary key, maka akan ada tanda kunci di
bagian kiri file nime yang kita jadikan key, seperti berikut :
|
|
·
Letakkan kursor di file
namenya yaitu “nim”,
lalu klik kanan-> pilih Primari Key
·
Setelah
selesai, maka simpan table tersebut dengan cara,
Pilih File->Klik
save atau dengan shortcut Ctrl+S.
Pada Table Name, berikan nama table. Dalam kasus ini saya
berikan nama “Tmaha”, dan pilih OK.
Setelah
di Simpan atau save, maka selesai pula design batabase kita yaitu database
mahasiswa, berikut nya kita akan merancang program C++ Builder untuk
mengolah database tersebut, namun sebelum itu, silahkan keluar dulu dari
aplikasi access nya, atau pulih Close sampai Access nya tertutup.
|
|
B.
Merancang Program Pengolahan
Database nya dengan Borland C++ Builder 6
Caranya :
1.
Pilih All Program->Program
File-> Borland C++ Builder 6.
2.
Kemudian Tentukan Nama Form nya,
yaitu Form1 diganti menjadi “Fmaha”,
Caranya klik selali Form1 dan cari di Object Inspektor
komponen Name.
Ganti Form1 dengan Fmaha, seperti barikut :
3.
Setelah selesai, Simpan Program
dengan cara
klik File ->Save
All atau shortcut Shift+Ctrl+S, maka akan muncul kitak dialog untuk menentukan
tempat penyimpanan, serta nama project yang akan kita berikan (sesuai
keinginan). Pada kotak Save in : pilih folder tempat penyimpanan (dalam kasus
ini adalah folder “ Latihan PBO”), dan pada kotak File name, ganti Unit1 dengan
Umaha, kemudian pilih Save. Seperti gambar berikut :
Setelah
di Save, maka akan muncul lagi kotak dialog, pilih saja Save (pada File
Name, Anda boleh mengganti Project1 dengan nama yang Anda inginkan ).
|
|
4.
Langkah berikutnya adalah membuat
DataModul untuk menghubungkan database dengan program, caranya : Pilih File
pada taksbar menu, pilih New->DataModule :
Maka akan
muncul Form Modul seperti gambar dibawah :
5.
Berikut nya kita akan memilih
komponen-komponen yang kita butuhkan untuk menghubungkan data base dengan
program, adapun komponen tersebut adalah ADO Connection, ADOTable, dan Data
Saoure.
Caranya : Cari Komponen tersebut di Taksbar Icon, Pilih ADO
dan ambil komponen ADO Connection, ADOTable dan letakkan pada DataModule1,
kemudian untuk Data Saoure ada di komponen Data Access:
Hasilnya setelah mengambil Komponen-komponen ter sebut
adalah :
Settingan Untuk DataModule1 adalah :
·
Klik 2x ADOConnetion,
maka akan tampil kotak dioalog untuk mengkoneksikan database yang telah kita
buat dengan program yang akan kita rancang, cara nya :
Pilih Build pada kotak dialog tersebut, kemudian pilih “Microsoft.Jet.OLEDB.4.0;Data
Source” è
Klik Next è Lalu
tentukan Database yang akan kita koneksikan, dengan cara mengklik Tombol select pada kota select
Pada kotak dialog Select cari
Database yang akan kita koneksikan yaitu “dbmaha” dan pilih Open. Setelah dipilih, klik “Test Connection” untuk menguji apakah koneksi berhasil atau tidak,
jika berhasil maka akan tampil pesan seperti berikut : Jika tidak ada pesan si samping, maka
Silahkan
tentukan coneksi kembali. Kemudian jika sudah, pilih OK è OK.
·
Berikutnya klik sekali saja ADO
Connection nya,
pada Properties
cari “Login Prompt” ganti nilai True
menjadi False.
·
Berikutnya klik sekali saja pada ADOTable1, di Properties, ganti Name menjadi tmaha è
Connection = “ADOConnection1”(pilih icon segitiga hitam
pada kotak connection dan ubah menjadi ADOConnection1).
·
Setelah diconneksikan ke
ADOConnection1, selanjutnya di Properties tentukan TableName =”Tmaha” (sesuaikan dengan isi tablenamenya), dan pada Active ubah menjadi True.
·
Berikutnya adalah Settingan untuk
Data Source, yaitu :
klik sekali Data Source nya è di Properties : ganti Name dengan “dsmaha”, dan Data Set menjadi “tmaha”(Dataset
disesuiakan dengan table kita).
6.
Setelah menyetting komponen
DataModule1, berikutnya kita akan memperkenalkan Form DataModule1 dengan Fmaha
(Agar bisa saling terhubung satu sama lain), caranya : klik sekali Fmaha dan
Tekan Alt+F11. Pada Kotak dialog Use Unit, Blok semua dan pilih OK. Kemudian Klik lagi DataModule1 dan
Tekan Alt+F11. Pada Kotak dialog Use Unit, Blok semua dan pilih OK.
7.
Setelah kita kenalkan, maka hal berikutnya
kita akan men-design Fmaha nya.
Adapun komponen yang kita butuhkan adalah Edit, Label,
Button dari komponen Standar dan Dbgrid dari komponen Data Access. Hasil Design
nya adlah seperti gambar berikut :
Ganti
variabel Button sesuai nama tombolnya, misalnya; Simpan menjadi “save” (untuk mempermudah dalam mengenali
komponen” yang ada)
|
|
Ganti variabel dengan Ejurusan
|
|
Ganti variabel dengan Ealamat
|
|
Ganti variabel dengan Enama
|
|
Ganti variabel dengan Enim
|
|
a.
Cara mengganti variabel Edit Text
adalah, klik sekali pada komponen Edit tersebut, misalnya Edit1 : di Properties
pada Object Inspektor, ganti Name = ”Enim” dan hapus tulisan “Edit1” pata Text.
Silahkan ulangi perintah diatas untuk mengatur variabel Edit lainya.
b.
Cara mengganti variabel Button
adalah sama dengan cara mengganti variabel Edit, yaitu di Properties pada
Object Inspektor.
c.
Untuk komponen DBGrid, klik sekali
DBGrid nya, lalu pilih DataSourceè dan pilih DataModule1->dsmaha, di
Properties pada Object Inspektor.
8.
Berikutnya setelah men-design
Form, maka kita akan memberikan perintah-perintah pada Tombol-tombol yang telah
kita sediakan. Berikut perintah yang akan kita sisipkan dalam program :
a.
Pada tombol save (jika diganti
nama button), klik 2x dan isikan coding dibawah ini :
if (Trim(Enim->Text)==""){
ShowMessage("Nim nama masih
kosong");
Enim->Clear();
Enim->SetFocus();
}
else
if(DataModule1->tmaha->Locate("nim",Enim->Text,TLocateOptions()<
Tulisan
nim harus sama dengan filename yang ada pada data base, begitu juga dengan
tulisan yang ada pada nama,alamat dan jurusan.
|
|
ShowMessage("nim sudah ada");
Enim->Clear();
Enim->SetFocus();
}
else{
DataModule1->tmaha->Append();
DataModule1->tmaha->FieldByName("nim")->AsString =
Enim->Text;
DataModule1->tmaha->FieldByName("nama")->AsString =
Enama->Text;
DataModule1->tmaha->FieldByName("alamat")->AsString =
Ealamat->Text;
DataModule1->tmaha->FieldByName("jurusan")->AsString
= Ejurusan->Text;
DataModule1->tmaha->Post();
ShowMessage("data sudah tersimpan");
(a)
Perintah di samping
berguna untuk menambahkan file ke dalam database
|
|
Enim->Clear();
Enama->Clear();
Ealamat->Clear();
Ejurusan->Clear();
Editnim->SetFocus();
}
b.
Pada tombol Ubah klik 2x dan
isikan coding dibawah ini :
DataModule1->tmaha->Edit();
DataModule1->tmaha->FieldByName("nama")->AsString
= Enama->Text;
DataModule1->tmaha->FieldByName("alamat")->AsString
= Ealamat->Text;
DataModule1->tmaha->FieldByName("jurusan")->AsString
= Ejurusan->Text;
(b) Perintah di atas berguna
untuk mengubah yang telah ada dalam database
|
|
DataModule1->tmaha->Post();
c.
Pada Enim (Edit->Text), klik 2x
dan isikan coding dibawah ini :
DataModule1->tmaha->Filtered =
False;
DataModule1->tmaha->Filter =
"nim like '%" + Enim->Text + "%'";
if ( Enim->Text !=""){
(c)
Berfungsi untuk mencari data dari database.
|
|
DataModule1->tmaha->Filtered = True;
Enama->Text =
DataModule1->tmaha->FieldByName("nama")->AsString ;
Ealamat->Text=
DataModule1->tmaha->FieldByName("alamat")->AsString ;
Ejurusan->Text=
DataModule1->tmaha->FieldByName("jurusan")->AsString ;
}
d.
Pada tombol Hapus, klik 2x dan
isikan coding dibawah ini :
DataModule1->tmaha->Delete(); è
berfungsi untuk menghapus database.
e.
Pada tombol Bersih, klik 2x dan
isikan coding dibawah ini :
(e)
Untuk membersihkan Text yang ada pada Enim,Enama,Ealamat. Dan Ejurusan.
Serta meletakkan kursor di Enim Text.
|
|
Enim->Clear();
Enama->Clear();
Ealamat->Clear();
Ejurusan->Clear();
Enim->SetFocus();
f.
Pada tombol Keluar, klik 2x dan
isikan coding dibawah ini :
Application->Terminate(); è untuk
keluar dari program.
g.
Pada tombol Cetak, klik 2x dan
isikan coding dibawah ini :
CrystalReport1->ReportFileName =
ExtractFileDir(ParamStr(0)) + "/lap-mhs.rpt";
CrystalReport1->DiscardSavedData=
True;
(g)
disesuaikan dengan file rpt(laporan) yang kita buat.
|
|
CrystalReport1->WindowState=crptMaximized;
CrystalReport1->Action = 1;
CrystalReport1->PageZoom(300);
CrystalReport1->PrinterSelect();
9.
Sebelum kita mengisi koding(perintah) pda tombol cetak, kita
harus membuat file laporan nya terlebih dahulu. Setelah file laporan di buat
maka tambahkan komponen “CrystalReport” pada Fmaha,
yang mana komponen
itu ada di Activex. Jika tidak ada maka instal terlebih dahulu componennya
melalui ComponnenèInport Activex Control.
