Laporan Praktikum 1.docx

LAPORAN PRAKTIKUM I PEMROGRAMAN VISUAL PEMROGRAMAN DATABASE DENGAN DELPHI

Disusun oleh: Achmad Ichwan 18330118

POGRAM STUDI TEKNIK INFORMATIKA FAKULTAS TEKNIK UNIVERSITAS JANABADRA YOGYAKARTA 2019

BAB I PENDAHULUAN 1.1 Latar Belakang Pemrograman visual adalah suatau bahasa pemrograman yang didalamnya terdapat himpunan simbol-simbol grafis dan teks yang mempunyai arti yang semantik dan mengunakan pengunaan expresi visual seperti grafik,gambar atau ikon yang sistematik dan mempunyai arti tertentu serta mengacu pada aktivitas yang memungkinkan pada pengguna untukmembuat program dalam (dua atau lebih) dimensi. Delphi adalah salah satu bahasa pemrograman berbasis visual yang digunakan untuk membuat program aplikasi pada komputer (seperti Visual basic). Bahasa pemrograman yang digunakan oleh Delphi sebenarnya merupakan turunan dari bahasa pemrograman pascal, yang dahulu pada Delphi dikenal sebagai objek pascal. Bagi Anda yang telah mengenal bahasa pemrograman pascal, maka mungkin Anda tidak akan terlalu kesulitan dalam mempelajari Delphi. Delphi relatif lebih mudah dipahami dibandingkan dengan bahasa pemrograman lainnya, disamping itu banyak referensi terutama dalam bentuk buku yang membahas tentang bahasa pemrograman ini. Delphi telah terbukti mampu menghasilkan software-software yang berkualitas, baik yang berskala besar maupun kecil, teknologi yang digunakan pada Delphi pun cukup uptodate. Sampai saat ini, Borland sebagai perusahaan pembuat Delphi, terus menyempurnakan Delphi mengikuti perkembangan teknologi yang begitu pesat. 1.2 Tujuan Praktikum 1. Mahasiswa mengetahui apa yang di maksud dengan pemrograman visual 2. Mahasiswa mengatahui bagaimana membuat pemrograman visual dengan menggunakan Borland Delphi 3. Mahasiswa dapat mengetahui dasar dan fungsi Borland Delphi 4. Mahasiswa di harapkan dapat mengkoneksikan antara database dengan menggunkan Microsoft Acces dengan Borland Delphi .

1

BAB II TINJAUAN PUSTAKA

2.1 Persiapan Praktikum 2.1.1 Perangkat Keras 1. Laptop 2.1.2 Perangkat Lunak 1. Borland Delphi 7 2. Snipping Tool 2.1 Dasar Teori Delphi adalah Suatu bahasa pemrograman yang menggunakan visualisasi sama seperti bahasa pemrograman Visual Basic ( VB ) . Namun Delphi menggunakan bahasa yang hampir sama dengan pascal (sering disebut objeck pascal ), sehingga lebih mudah untuk digunakan . Bahasa pemrograman Delphi dikembangkan oleh CodeGear sebagai divisi pengembangan perangkat lunak milik embarcadero . Divisi tersebut awalnya milik borland, sehingga bahasa ini memiliki versi Borland Delphi. Delphi juga menggunakan konsep yang berorientasi objek ( OOP ) , maksudnya pemrograman dengan membantu sebuah aplikasi yang mendekati keadaan dunia yang sesungguhnya . Hal itu bisa dilakukan dengan cara mendesign objek untuk menyelesaikan masalah . OOP ini memiliki beberapa unsur yaitu ; Encapsulation ( pemodelan ) , Inheritance ( Penurunan ) , Polymorphism ( Polimorfisme ). Selain itu delphi dapat menghubungkan database dari ms Access untuk dipakai sebagai penyimpanan dan pemrosesan data. dengan fasilitas ADO pada delphi 7, dapat dikoneksikan database ms access dengan ekstensi .mdb berikut cara melakukan koneksinya: 1. Buka delphi 7 2. Pilih bagian ADO 3. Ambil ADOConnection dan ADOTable dan masukkan ke dalam form

2

4. ADOConnection digunakan untuk melakukan koneksi dengan file database yang telah dibuat, untuk membuat file database. 5. ADOTable digunakan untuk mengambil table yang ada di dalam database. pada ADOTable dapat disetting nilai field yang terdapat pada table database yang diambil. ADOTable terkoneksi dengan ADOConnection. 6. Ambil datasource dan masukkan ke dalam form. Datasource digunakan untuk pengambilan data field yang terdapat di dalam table, datasource secara langsung terkoneksi dengan ADOTable 7. Doubleklik pada ADOConnection, lalu klik build, pilih microsoft jet 4, microsoft jet 4 digunakan untuk mengenali file database dari ms Access, kemudian pilih next. 8. Pada bagian conection, pilih lokasi database(ekstensi .mdb) yang sebelumnya telah dibuat. Lakukan test connection untuk melihat database telah terkoneksi atau belum. 9. Apabila database memiliki password maka isikan pada bagian password dan username. Setelah selesai klik ok. 10. Klik ADOConection, pada bagian properties onected diatur true agar file database terkoneksi dengan program yang dibuat. 11. klik ADOTable, pada bagian properties , klik active digunakan untuk mengaktifkan pengambilan tabel menjadi True. 12. Klik datasource, pada bagian properties. 13. Dataset digunakan untuk mengambil data field pada table yang diinginkan, table yang telah aktif dan telah dibuat adalah table dari ADOTable dengan nama table1 karena itu dataset dapat diisi dengna table1. 14. Masuk ke bagian data control. 15. Pilih dbgrid lalu tempatkan pada form. 16. Dbgrig adalah tampilan interface berupa table, namun karena belum diisi atau di relasikanmaka tampilan dbgrid kosong. 17. Pada bagian properties dbgrid, datasource dapat diisi dengan source1 yaitu nilai dari field yang telah diambil dari database access.

3

18. Setelah melakukan perubahan properties pada dbgrid maka tampilannya akan berubah dan menampilkan isi table database yang telah diambil.

4

BAB III PELAKSANAAN PRAKTIKUM

3.1 Praktikum 1. Buat Database Toko di Ms.Access, langkah-langkah: 2. Buka Ms.Access 3. Klik File-New – Blank Database 4. Beri nama File Name: Toko, klik create 5. Pada menu Table klik create Table in Design view untuk membuat struktur tabel.Buat tabel Barang dengan struktur seperti di bawah ini, dengan KodeB sebagaikunci primer (klik kanan pada field kodeB – primary key)

Gambar 3.1 Field Name dalam Tabel Barang 6. Simpan tabel dengan nama Barang, kemudian tutup design tabel 7.

Pada jendela Toko:database, double klik tabel barang, kemudian isi tabel dengandata-data di bawah ini

Gambar 3.2 Isi dalam Tabel Barang 8. Dengan cara yang sama, buat tabel Beli dengan struktur seperti di bawah ini :

5

Gambar 3.3 Field dalam Tabel Beli 9. Kemudian isi Tabel Beli dengan data-data seperti di bawah ini

Gambar 3.4 Isi dalam Tabel Beli 10. Relasikan tabel Beli dengan tabel Barang

Gambar 3.5 Relasi dari Dua Buah Tabel 11. Tutup aplikasi Ms.Access 12. Form1 Pencarian Data

6

Gambar 3.6 Tampilan dari Form Pencarian Data 13. Source Code Form Pencarian Data procedure TForm1.edt1Change(Sender: TObject); begin tbl1.Locate('NamaB',edt1.Text,[]); end; procedure TForm1.edt2Change(Sender: TObject); begin tbl1.Locate('NamaB',edt2.Text,[loPartialKey]); end; procedure TForm1.btn1Click(Sender: TObject); begin if ada =0 then tbl1.First else tbl1.Next; while not tbl1.Eof do begin ada :=Pos(UpperCase(edt3.Text),UpperCase(tbl1['NamaB'])); if ada>0 then Break; tbl1.Next; end; if ada =0 then begin Beep; tbl1.First; end; end; procedure TForm1.btn2Click(Sender: TObject); begin hide; form2.Show; end; end.

14. Hasil Run dari Form Pencarian Data dalam a. Metode I

7

Gambar 3.7 Hasil Run dari Form 1 Metode 1 b. Metode II

Gambar 3.8 Hasil Run dari Form 1 Metode 2 c. Metode III

8

Gambar 3.9 Hasil Run dari Form 1 Metode 3

15. Form 2 untuk Input data atau Memanipulasi sebuah data

Gambar 3.10 Tampilan Form Input Data Atau Manipulasi Data 16. Source Code Form Input Data procedure TForm2.btn1Click(Sender: TObject); begin tbl1.Append; tbl1['KodeB']:=edt1.Text; tbl1['NamaB']:=edt2.Text;

9

tbl1['Hbeli']:=edt3.Text; tbl1['Hjual']:=edt4.Text; tbl1.Post; end; procedure TForm2.btn2Click(Sender: TObject); begin tbl1.Delete; end; procedure TForm2.dbgrd1CellClick(Column: TColumn); begin edt5.Text :=dbgrd1.Fields[0].AsString; edt6.Text :=dbgrd1.Fields[1].AsString; edt7.Text :=dbgrd1.Fields[2].AsString; edt8.Text :=dbgrd1.Fields[3].AsString; end; procedure TForm2.btn3Click(Sender: TObject); begin tbl1.Edit; tbl1['KodeB']:=edt5.Text; tbl1['NamaB']:=edt6.Text; tbl1['Hbeli']:=edt7.Text; tbl1['Hjual']:=edt8.Text; tbl1.Post; end; procedure TForm2.btn4Click(Sender: TObject); begin Hide; form3.show; end; end.

17. Hasil Run Insert

10

Gambar 3.11 Hasil Run dari Form Input Data pada Buton Simpan 18. Hasil Run Dari Delete

Gambar 3.12 Hasil Run dari Form Input Data pada Buton Hapus 19. Hasil Run dari Edit

Gambar 3.13 Hasil Run dari Form Input Data pada Buton Edit

11

20. Form 3 Membuat Form Relasi Tabel

Gambar 3.14 Tampilan Form Relasi Tabel 21. Hasil Run

Gambar 3.15 Hasil Run dari Form yang Merelasikan Dua Buah Tabel

12

13