[Delphi] Koneksi Delphi – MySQL dengan menggunakan ZEOS

Delphi merupakan rapid programming dimana terdapat banyak komponen-komponen add-in yang dapat ditambahkan di delphi. komponen-komponen tersebut ada yang gratis maupun berbayar, contoh salah satu komponen delphi yang telah terbundle secara rapi adalah jedi dengan alamat referensi http://www.delphi-jedi.org/.

Di tutorial ini saya akan membahas salah satu komponen gratisan yang digunakan sebagai konektor untuk menghubungkan aplikasi dengan database, fasilitasnya cukup komplit karena dapat menghandle koneksi mulai dari MySQL sampai Oracle. komponen ini dapat didownload di http://sourceforge.net/projects/zeoslib, penggunaannya pun sangat mudah dan tidak memerlukan banyak waktu untuk melakukan koneksi dengan database. dalam penggunaannya, zeos tidak memerlukan ODBC (Open Database Connectivity). untuk masalah kehandalan, zeos dapat dikatakan cukup handal sebagai komponen konektor database, selain itu para pengembang zeos juga masih selalu aktif untuk melakukan perubahan-perubahan versi yang dapat dikatakan bahwa zeos sendiri masih hidup.

Untuk melakukan koneksi dengan zeos, terlebih dahulu kita harus menginstall zeos di delphi, karena saya memakai delphi 2009 . sebagai informasi bahwa walaupun zeos yang didownload ada package untuk delphi 2009 tetapi pada kenyataanya masih belum dapat diinstall di delphi 2009, untuk itu bagi para pengguna delphi 2009 dapat mendownload package zeos yang telah dimodif disini http://rapidshare.com/files/237345412/zeosdbo2009.7z . untuk menginstallnya sebagai berikut, buka delphi lalu pilih “ZeosDBO_D2009.groupproj” (untuk delphi 2009 link yang telah saya sediakan), ZComponent.dpk(untuk delphi 7). lalu untuk delphi 2009 akan muncul pada window project manager(lokasi default panel sebelah kanan), akan muncul jendela baru project manager untuk delphi 7.  khusus untuk delphi 7, silahkan pilih package untuk delphi 6 karena apabila anda memilih package delphi 7 maka akan timbul pesan error tidak dapat diinstall, hal ini terjadi pada setiap versinya dan saya selaku penulis tidak mengetahui kenapa hal ii tidak terjamah oleh para pengembang zeos. Untuk delphi 2009 pilih salah satu dpk lalu klik kanan dan pilih menu Compile All From Here dan setelah selesai meng-compile klik kanan lagi dan klik install, untuk delphi 7 klik install dan apabila berhasil akan muncul kotak dialog yang menunjukkan bahwa penginstallan telah selesai dijalankan seperti gambar berikut :

Setelah selesai melakukan proses penginstallan, arahkan library path delphi ke dalam direktori zeos, untuk delphi 7 dapat dilakukan dengan memilih menu Tools->Environment Options lalu pilih tab library dan tekan tombol yang menunjukkan library path dan akan muncul kotak diaog dan klik tombol dengan caption “…” lalu arahkan ke direktori <Folder Zeos>packagesdelphi6build lalu tekan OK dan klik tombol Add (apabila terdapat salah langkah mohon maaf karena saya tidak menggunakan delphi 7 lagi jadi langkah-langkah tersebut hanya sebatas ingatan saya saja ).untuk Delphi 2009 pilih tools->Options dan pilih menu dari treeview yang bernama Library – Win32 setelah itu klik tombol yang ada di area library path dan tekan tombol “…” lalu arahkan ke direktori <Folder Zeos>packagesdelphi2009 lalu klik OK dan klik tombol Add. Zeos untuk dapat berfungsi dengan baik memerlukan library MySQL yaitu libmysql yang dapat didownload di link ini , letakkan kedua LibMySQL tersebut di direktori Windows (default : C:Windows).

Apabila telah benar-benar selesai melakukan penginstallan zeos secara menyeluruh seperti langkah-langkah di atas maka selanjutnya adalah mengimplementasikan koneksi aplikasi dengan MySQL menggunakan komponen zeos yang telah terinstall. buka project baru dan pilih komponen TZConnection dan TZQuery yang terdapat di bagian Zeos Access . List komponen Zeos 2009 adalah sebagai berikut :

Untuk membuat aplikasi terkoneksi dengan database, kita gunakan TZConnection sebagai pusat koneksi dengan database, kali ini saya akan memberi contoh bagaimana mengkoneksikan zeos dengan database MySQL. berikut ini adalah skemanya :

Gambar di atas adalah skema koneksi antara Zeos dengan MySQL. untuk mengimplementasikannya, kita akan mengkoneksikan zeos dengan database bawaan MySQL yaitu bernama “mysql” untuk itu tempelkan komponen TZConnection ke dalam form baru dan set propertinya sebagai berikut :

• User              : root <atau sesuai dengan konfigurasi user MySQL anda>
• Protocol     : mysql
• Port              : 3306 <atau sesuai dengan konfigurasi port MySQL anda>
• HostName : Localhost <bisa diisi dengan IP komputer>
• Database    : mysql<contohnya>
• Connected : True

Apabila Connected dapat True dan tidak ada pesan error maka selamat anda telah berhasil mengkoneksikan aplikasi dengan MySQL dengan baik tetapi apabila tidak maka silahkan periksa kembali settingan yang anda buat apakah telah sesuai atau belum. Untuk mengetes apakah telah benar-benar terkoneksi atau belum kita tambahkan TZQuery ke dalam form lalu set properti seperti berikut :

• Name            : qAct <biar sesuai dengan koding yang akan saya contohkan>

• Connecton : ZConnection1 <sesuai dengan nama yang anda buat pada komponen TZConnection>

Lalu tambahkan komponen TDataSource ke dalam aplikasi dan set properti seperti berikut :

• Name           : dsAct
• DataSet       : qAct

Lalu tambahkan juga komponen TDBGrid ke dalam form dan set properti DataSource menjadi dsAct, untuk melakukan aksi pengaksesan kita tambahkan Button dengan properti Name menjadi btnTampil, rancangan Formnya adalah sebagai berikut :

dan terakhir berikan kode pada event OnClick milik btnTampil sebagai berikut :

procedure TForm1.btnTampilClick(Sender: TObject);
begin
with qAct do
begin
Close;
SQL.Text := 'SELECT * FROM help_category';
Open;
end;
end;

Lalu coba jalankan aplikasi dengan menekan tombol pada keyboard F9 dan apabila telah berjalan tekan tombol Tampilkan dan apabila telah benar maka akan keluar data pada grid yaitu sebagai berikut :

Catatan :

Ada 2 method yang harus diperhatikan dalam zeos, yaitu ketika kita menampilkan data struktur perintah TZQuery adalah sebagai berikut :

 

with ZQuery1 do
begin
Close;
SQL.Text := 'Perintah SQLnya';
Open; //digunakan untuk penampilan data
end;

Tetapi apabila kita ingin melakukan entry data (insert,update,delete) maka struktur perintah TZQuery adalah sebagai berikut :

with ZQuery1 do
begin
Close;
SQL.Text := 'Perintah SQLnya';
Execute; //digunakan untuk Entry data
end;

Untuk lebih jelasnya, anda dapat mendownload hasil project disini

Sekian dulu tutorial penggunaan zeos untuk koneksi aplikasi dengan MySQL semoga tutorial ini berguna bagi temen-temen sekalian.