Delphi dengan ms access
- 1. Komunitas eLearning IlmuKomputer.Com Copyright 息 2003-2007 IlmuKomputer.Com 1 Mengakses database Microsoft Access dengan Delphi 7.0 Taufik Adi S taufiksanjaya@yahoo.com http://www.kaya-syariah.blogspot.com Lisensi Dokumen: Copyright 息 2003-2007 IlmuKomputer.Com Seluruh dokumen di IlmuKomputer.Com dapat digunakan, dimodifikasi dan disebarkan secara bebas untuk tujuan bukan komersial (nonprofit), dengan syarat tidak menghapus atau merubah atribut penulis dan pernyataan copyright yang disertakan dalam setiap dokumen. Tidak diperbolehkan melakukan penulisan ulang, kecuali mendapatkan ijin terlebih dahulu dari IlmuKomputer.Com. Dalam tulisan ini akan dijelaskan secara ringkas mengenai cara pengaksesan database yang dibuat dengan Microsoft Acces yang kemudian data tersebut diolah/dimodifikasi dengan menggunakan program Borland Delphi 7.0. Program yang dibuat terbatas pada menampilkan membuat database, pembuatan program database, membaca database, menghapus database. Pendahuluan Database adalah sekumpulan data yang disusun sedemikian rupa sehingga mampu menghasilkan sebuah informasi yang informatif bagi penggunanya. Proses Pembuatan Program Buat database dengan Ms Access dengan nama Proyek Akhir.mdb 1. Buka Ms Acces
- 2. Komunitas eLearning IlmuKomputer.Com Copyright 息 2003-2007 IlmuKomputer.Com 2 2. File new blank database 3. Buat table baru Dengan field-field sebagai berikut: No Nama Filed Data type Properties Value 1 Nama Mahasiswa Text Field Size 25 2 NIM Text Field Size 12 3 Jurusan Text Field Size 20 4 Kelas Text Field Size 2
- 3. Komunitas eLearning IlmuKomputer.Com Copyright 息 2003-2007 IlmuKomputer.Com 3 5 Nama Pembimbing Proyek Akhir Text Field Size 25 6 Text Text Field Size 20 7 Judul Proyek Akhir Text Field Size 50 D4. iperoleh hasil akhir sebuah table dengan namaProyek Akhir.mdb dengan tampilan sebagai berikut : Buat program interface (antarmuka) database Ms Access dengan Delphi 7.0. 1. Buka Delphi 7.0 2. Masukkan komponen sebagai berikut: No Komponen Properti Nilai 1 ADOConnection1 Dari component palete ADO Connection String Lihat Pada Catatan di bawah.* Connected True Login Prompt False 2 ADOTable1 Dari component palete ADO Connection ADOConnection1 Table Name Proyek Akhir Active True 3 DataSource1 Dari component palete Data Access Data Set ADOTable1 4 Dari component palete ess Data Source DataSource1DBGrid1 Data Acc 5 Data Source DataSource1DBNavigator
- 4. Komunitas eLearning IlmuKomputer.Com Copyright 息 2003-2007 IlmuKomputer.Com 4 mponentDari co paleteData Access 6 Button1 Dari component paleteStandard Name Button1 Caption Simpan 7 Button2 Dari component paleteStandard Name Button2 Caption Batal 8 andard Name Button3Button3 Dari component paleteSt Caption Laporan 9 andard Caption Nama Mahasiswa :Label1 Dari component paleteSt 10 onent paleteStandard IM :Label2 Dari comp Caption N 11 Label3 Dari component paleteStandard Caption Jurusan : 12 Dari component tandard Caption Kelas :Label4 paleteS 13 onent paleteStandard Nama Pembimbing Proyek Akhir : Label5 Dari comp Caption 14 Label6 Dari component paleteStandard Caption Tanggal SK Pembimbing : 15 component paleteStandard Caption Judul Proyk Akhir :Label7 Dari 16 onent tandard -Edit1 Dari comp Text paleteS 17 Edit2 Dari component Text -
- 5. Komunitas eLearning IlmuKomputer.Com Copyright 息 2003-2007 IlmuKomputer.Com 5 paleteStandard 18 component -Edit3 Dari paleteStandard Text 19 Dari component tandard Text -Edit4 paleteS 20 -Edit5 Dari component paleteStandard Text 21 Edit6 Dari component paleteStandard Text - 22 component tandard Text -Edit7 Dari paleteS *Cat Property Connection String dibuat dengan cara sebagai berikut: 1. Klik pada properti Connection string pada Object Inspector, kotak dilaog sebagai berikut: Gambar 12. Membangun koneksi database 2. Klik tombol Build, akan muncul kotak dialog Data Link Microsoft Jet 4.0 OLE DB Provider, lalu klik atan : sehingga muncul Properties, pilih Next
- 6. Komunitas eLearning IlmuKomputer.Com Copyright 息 2003-2007 IlmuKomputer.Com 6 Gambar13 . Memilih Driver Database dialog sebagai berikut: Gambar 14. Mem Database Klik pada tombol di sebelah kanan, select or enter a databae name. Kemudian pilih database Proyek Akhir.mdb yang telah dibuat sebelumnya. Selanjutnya, klik tombol Test Connection, jika telah terjadi 3. Klik tombol Build, akan muncul kotak ilih
- 7. Komunitas eLearning IlmuKomputer.Com Copyright 息 2003-2007 IlmuKomputer.Com 7 koneksi antara program yang akan dibuat dengan Database Microsoft Access yang telah dibuat maka akan muncul kotak dialog sebagai berikut : Gambar 15. Koneksi Sukses Tampilan akhir program yang akan dibuat adalah sebagai berikut: Double Click pada Button dengan caption Batal Masukkan Source code sebagai berikut: edit1.Text:=''; edit edit3.Text:=''; edit4.Text:=''; Double Click pada Button dengan caption Simpan 2.Text:=''; edit5.Text:=''; edit6.Text:=''; edit7.Text:='';
- 8. Komunitas eLearning IlmuKomputer.Com Copyright 息 2003-2007 IlmuKomputer.Com 8 Ma Adotable1.Open; AdoT ADOT ADOT ADOT ADOT ext; Nama Pembimbing Proyek Akhir').AsString:=edit5.Text; ADOTable1.FieldByName('Tanggal SK Pembimbing').AsString:=edit6.Text; ADOTable1.FieldByName('Judul Proyek Akhir').AsString:=edit7.Text; ADOTable1.Post ; Catatan kecil : pada perintah ADOTable1.FieldByName('Nama Mahasiswa').AsString:=edit1.Text; Nama Mahasiswa adalah nama field yang dibuat pada database Proyek akhir.mdb, Field-field dapat dilihat pada table paling atas. Selanjutnya Carany Ketika masing-masing edit.text dengan tulisan tertentu. Maka data/tulisan tersebut akan ot n ke field-field dalam database yang telah dibuat. Sebagai contoh adalah sebagai berikut sukkan Source code sebagai berikut: able1.Append; able1.FieldByName('Nama Mahasiswa').AsString:=edit1.Text; able1.FieldByName('NIM').AsString:=edit2.Text; able1.FieldByName('Jurusan').AsString:=edit3.Text; able1.FieldByName('Kelas').AsString:=edit4.T ADOTable1.FieldByName(' Run Program yang telah a adalah click Run Run dibuat, Atau tekan F9 pada Key Board Diperoleh hasil eksekusi program sebagai berikut: kita mengetik omatis tersimpa
- 9. Komunitas eLearning IlmuKomputer.Com Copyright 息 2003-2007 IlmuKomputer.Com 9 Sekian dulu ya, semoga bermanfaat.. Penutup Sekian tulisan saya yang berjudul Membuat Dialog Killer dengan Delphi 7.0. Silakan baca tulisan saya di IlmuKomputer.com sebagai berikut: 1. Kirim dan terima SMS di Hand Phone Nokia dengan Mudah menggunakan komponen Oxygen SMS pada Delphi7.0 2. Mengakses database Access dengan Delphi 7.0 3. Membuat report pada Delphi 7.0 menggunakan komponen Rave Report 4. ikutHasilnya adalah sebagai ber Mengakses port parallel PC dengan Delphi 7.0 menggunakan komponen Small Port
- 10. Komunitas eLearning IlmuKomputer.Com Copyright 息 2003-2007 IlmuKomputer.Com 10 5. SMS pada Delphi 7.0 6. Cara Instalasi komponen Small Port pada Delphi 7.0 7. Cara Mempercantik tampilan Program yag dibuat dengan Visual Basic menggunakan komponen VB Skinner Pro 8. Mempercantik tampilan Program yag dibuat dengan Delphi 7.0 menggunakan Komponen Suipack 9. Membuat Web sederhana dengan Joomla Referensi Kadir, Abdul. 2005. Pemrograman Databse dengan Delphi 7.0 Menggunakan Access ADO. Yogyakarta : Andi. Biografi Penulis Taufik Adi S. Numpang lahir di Garut, Jawa Barat. Dibesarkan di Kulon Progo. Saat ini tinggal di Bantul. sedang dala an Pendidikan Teknik Elektro Universitas Negeri Yogyak ambil adalah Kendali Industri. Salah satu alumni angkatan 2006 SMA Negeri 2 Wates Kulon Progo, yang pernah memiliki prestasi cukup membanggakan bagi sekolah saat itu. Kegiatan yang dilakukan saat ini adalah bermain-main dengan bahasa Pemrograman Delphi (khususnya Akses Port Paralel PC, Database dan Reporting, Akses SMS pada HP) Pernah juga sedikit belajar tentang Visual Basic, serta bahasa C. serta sedikit belajar pengembangan web sederhana dengan Joomla (Open Source) Hobi menulis artikel singkat, membaca buku , serta olah raga (Bela diri). Aktif di beberapa kegiatan Kampus serta kegiatan sosial sebagai sarana pengembangan diri. Cara Instalasi komponen Oxygen m proses menyelesaikan S1 Jurus arta. Konsentrasi Study yang di