Minggu, 30 Desember 2012

Cara koneksi dan Instalasi Zeos di Delphi 7

ZeosLib, merupakan component tambahan untuk Delphi 7 yang berfungsi sebagai penghubung antara Delphi 7 dengan database, seperti MySQL, PostgreSQL, SQLite, maupun Oracle. Konfigurasi Zeos tidaklah sulit, sehingga sangat membantu user dalam mengembangkan aplikasi desktop berbasis database.
File instalasi Zeos dapat di-download disini, dengan versi terbarunya adalah ZeosDBO-6.6.6-stable. Instalasi ZeosDBO ini tidak cukup sulit, namun instalasinya harus urut. Berikut ini sedikit penjelasan mengenai instalasi ZeosDBO di Delphi 7.
  1. Extract *.rar dari ZeosDBO di tempat yang anda inginkan. Pastikan bahwa lokasi dari folder ZeosDBO TIDAK diubah-ubah.
  2. Buka folder ZEOSDBO-6.6.6-stable, kemudian pilih buka folder package.
  3. Terdapat banyak pilihian package yang disupport oleh ZEOSDBO-6.6.6-stable. Buka folder delphi7.
  4. Cari file bertipe delphi package, bisa dengan sortir berdasarkan jenis datanya di explorer.
  5. Double-click pada file ZCore.bpl, setelah file terbuka di Delphi7, kemudian clickCompile.
  6. Lakukan hal yang sama pada file -file (urutan bebas).
    1. ZParseSQL.bpl
    2. ZPlain.bpl
    3. ZDbc.bpl
    4. ZComponent.bpl
  7. Double-click pada file ZComponentDesign, kemudian click Compile diteruskan dengan click Install. Tunggu sejenak, akan muncul pesan bahwa ZeosDBO telah terinstall.
Setelah ZeosDBO berhasil diinstall, langkah terakhir adalah link file source dan build dari package delphi 7 ke dalam enviroment Delphi 7, dengan cara :
  1. Di Menu utama Delphi 7, pilih Tools –> Enviroment Options –> Library
  2. Add direktori di Library Path, dengan click button di sebelah kanan [...]
  3. Tulis atau cari direktori ZeosDBO. Direktori yang penting adalah direktoriZEOSDBO-6.6.6-stable\src dan ZEOSDBO-6.6.6-stable\package\delphi7\build.
  4. Klik OK dan tutup Enviroment Options. Selesai.

bagi yang belum tahu cara koneksi ke database mysql pake zeos, caranya….
1. jalankan delphi… :D
2. letakkan komponen zconnection yang terdapat pada tab zeos access.
3. ubah properti hostname menjadi localhost atau IP dari server database yang dituju.
4. isikan user n password sesuai dengan setingan database anda. defaultnya, username = root password nya dikosongi.
5. protocol di pilih mysql-5
6. database isikan dengan nama database yang ingin anda koneksikan.
7. terakhir, ubah connected menjadi true.

JASA SERVIS KOMPUTER PANGGILAN KHUSUS GRESIK




Gresik Tunggal Computer 

Kami adalah penyedia jasa servis komputer panggilan Khusus Daerah Gresik 

MELAYANI:
KERJASAMA MAINTENANCE KOMPUTER PERUSAHAAN
PEMBUATAN WARNET,MAINTENANCE WARNET
PEMASANGAN JARINGAN WIRELESS

 Software engineering, Hardware  & Networking. 
Dapat dihubungi melalui:
Mobile: 081231596009 Flexi: 031 70814750 
Email: jazulii@yahoo.com

Cara menginstal quick report di Delphi 7 ...

Untuk membuat report atau laporan dari sebuah aplikasi database maka diperlukan suatu tools untuk membuat report atau laporan baik itu yang di sediakan langsung oleh Bahasa pemrograman itu sendiri atau aplikasi lain seperti crystal report. 
Mungkin Anda bingung karena pada saat mengistall Delphi 7....
quick report tidak tampil pada toolsnya. Dalam kesempatan ini saya akan berbagi cara install atau cara menambahkan tools quick report di Delphi 7. Jangan khawatir apakah quick report anda sudah ter install atau belum karena pada saat kita menginstall Delphi 7 maka quick report itu sudah terinstall didalamnya. Yang menjadi masalah adalah pada Delphi 7 quick report tidak secara langsung ditampilkan pada toolsnya. Berbeda halnya dengan Delphi versi sebelumnya yang langsung muncul pada tools nya.
Berikut langkah untuk menginstall quick report di Delphi 7 :

1.Buka aplikasi Delphi 7 yang sudah Anda Install.
2.Pilih menu ‘Component’
3.Pilih sub menu ‘Install Pakages…’ seperti gambar di bawah ini : 



4.Klik tombol ‘Add’, maka akan muncul kotak dialog seperti di bawah ini :



5.Masuk ke directory ‘C:\Program Files\Borland\Delphi7\Bin\’ lalu pilih file ‘dclqrt70.bpl’ seperti gambar berikut:



6.Klik tombol ‘Open’
7.Klik tombol ‘OK’

Setelah itu maka quick report telah ter install di Delphi 7 pada tab pallet terakhir seperti gambar berikut :



Mysql Connector Odbc 5.1.6 Win32

Mysq conector odbc adalah mesin penghubung antara database MySQL dengan bahasa pemrograman desktop
seperti Delphi dan lain lain

Cara installnya sama seperti cara install kebanyakan aplikasi yang lain,jadi agan semua ga perlu takut salah install..
dibawah ini link downloadnya.. :)


Sabtu, 29 Desember 2012

Koneksi Database dengan Delphi & MySQL

KONEKSI DELPHI & MYSQL
Di Delphi, telah disediakan berbagai cara untuk berkomunikasi dengan MySQL Server, ada ADO/dbGo – dengan perantaraan MyODBC driver, ada juga BDE dengan memanfaatkan ODBC, ada pula dbExpress yang melakukan koneksi langsung ke Server dengan perantaraan library MySQL. Sampai nanti, yang akan kita bahas adalah dbExpress ini, sebab dbExpress adalah teknologi koneksi database asli dari Borland, dan sudah mendukung MySQL sejak Delphi 6. Meskipun demikian tidak tertutup kemungkinan bagi Anda untuk menggunakan komponen koneksi pihak ketiga dalam aplikasi Delphi Anda, seperti MyDac dan sebagainya. 
OK, kini kita buat sebuah aplikasi baru di Delphi. Harap diingat, meski Delphi 6 sudah mendukung MySQL, namun yang saya gunakan dalam menulis posting ini adalah Delphi 2006. Kita lanjutkan dengan langkah-langkah berikut:
·Tambahkan sebuah TSQLConnection dari palette dbExpress ke form
jokorb_wordpress_post_mysql_delphi_1.gif
Atur property LoginPrompt menjadi False, lewat Object Inspector
·Klik kanan pada SQLConnection1 pada form dan pilih Edit Connection Properties
Sebuah dialog Connection Editor akan ditampilkan
jokorb_wordpress_post_mysql_delphi_2.gif
·Kita buat koneksi dengan mengklik tombol Add Conectionjokorb_wordpress_post_mysql_delphi_3.gif
Koneksi ini bertipe MySQL dan kita beri nama DBMyDatajokorb_wordpress_post_mysql_delphi_4.gif
Klik OK.
Kini kita atur property koneksi DBMyData ini seperti terlihat pada gambar berikut
jokorb_wordpress_post_mysql_delphi_5.gif
·Anda bias mencoba koneksi ini dengan mengklik tanda centang di bagian atas dialog. Jika pesan yang muncul menunjukkan koneksi sukses, selamat, Anda siap berksperimen dengan Delphi & MySQL!
·Klik OK untuk menutup dialog Connection Editor
·Kembali ke form, ubah properti SQLConnection1 menjadi True, sehingga koneksi ke MySQL menjadi aktif.
·Tambahkan sebuah TSQLTable dari palette dbExpress, sebuah TDataSource, TDataSetProvider dan TClientDataSet dari palette Data Access ke form
Atur properti SQLConnection milik SQLTable1 menjadi SQLConnection1 dan properti TableName menjadi “teman”, seperti yang telah kita buat pada langkah di atas.
jokorb_wordpress_post_mysql_delphi_6.gif
·Sekarang ubah properti Dataset dari DataSetProvider1 menjadi SQLTable1.
Ubah juga properti ProviderName dari ClientDataSet1 menjadi DataSetProvider1.
Terakhir, ubah properti DataSet dari DataSource1 menjadi ClientDataset1.
Dari langkah-langkah ini, kita bias melihat alur data dari server MySQL hingga ke GUI aplikasi kita dan juga sebaliknya, pada diagram berikut:
jokorb_wordpress_post_mysql_delphi_ilustrationdiagram.gif

Sebenarnya, akses data dalam table MySQL dapat langsung dilakukan antara DataSource1 dan SQLTable1, tapi karena SQLTable adalah dataset unidirectional (satu arah), penggunaan data control yang multidirectional menjadi tidak berfungsi dengan baik. Contoh, DBGrid, DBNavigator.
Pergerakan kursor penunjuk record pun hanya dapat bergerak dengan arah Next() dan First. Last() dan Next() tidak didukung.
Dataset unidirectional sangat menguntungkan saat koneksi ke SQL Server (pada umunya) mengembalikan sejumlah besar data, karena menghemat memori dan trafik network.
Delphi menyediakan cara mengatasi hal ini dengan menambahkan DataSetProvider dan ClientDataset di antara kedua komponen database di atas. Dataset provider berfungsi mengontrol data dari SQLTable, dan menyimpannya sementara secara lokal, dan kemudian direpresentasikan kembali dalam bentuk dataset oleh ClientDataset.
·OK. Kini kita tambahkan sebuah DBGrid [palette Data Controls] dan beberapa buah Button hingga tampilan form menjadi seperti ini:jokorb_wordpress_post_mysql_delphi_7.gif
·Sekarang kodenya. Klik ganda Button1, yang memiliki caption “Pertama”. Ketikkan kode untuk navigasi ke data pertama
1procedure TForm1.Button1Click(Sender: TObject);
2begin
3<span>   </span>ClientDataset1.First;
4end;
Untuk Button Sebelumnya
1procedure TForm1.Button2Click(Sender: TObject);
2begin
3if not ClientDataset1.Bof then
4ClientDataset1.Prior
5end;
Untuk Button Setelahnya
1procedure TForm1.Button3Click(Sender: TObject);
2begin
3if not ClientDataset1.Eof do then
4ClientDataset1.Next;
5end;
Untuk Button Terakhir
1procedure TForm1.Button4Click(Sender: TObject);
2begin
3ClientDataSet1.Last;
4end;
Untuk Button Refresh
1procedure TForm1.Button5Click(Sender: TObject);
2begin
3if ClientDataset1.ChangeCount>0 then
4ClientDataset1.ApplyUpdates(-1);
5end;
Untuk Button-Button lainnya dapat Anda lihat kodenya langsung pada demo program yang tersedia untuk Anda download di akhir tulisan ini.
·OK. Sekarang menampilkan data dari ClientDataset ke DBGrid. Seperti biasa, Anda cukup mengatur properti DataSource dari DBGrid1 menjadi DataSource1. Kini atur properti Active pada ClientDataset1 dan SQLTable1 menjadi True. Ubah juga properti Connection dari SQLConnection1 menjadi True.
·Jalankan program Anda.jokorb_wordpress_post_mysql_delphi_8.gif