Untuk dapat melakukan export data dari database ke dalam format excel dapat dengan mudah kita lakukan dengan menggunakan komponen tambahan delphi yaitu TscExcelExport. Berikut langkah-langkahnya :
- Pertama komponen ini harus anda install ke program delphi yang dipakai, sesuaikan dengan versi yang dipakai. Komponen dapat anda peroleh dari sini scip.be websites.
- Setelah komponen di download, install sesuai versi delphi yang dipakai dengan cara double klik file dclExcelExportPackXX.dproj
- Setelah file terbuka diprogram delphi yang anda pakai, klik kanan pada Project Manager pada tree dclExcelExportXX.dproj seperti gambar berikut :
- Pilih Compile untuk melakukan compile terlebih dahulu agar membentuk .dcu (Delphi Compiled Unit).
- Selanjutnya klik kanan lagi dan pilih Install untuk melakukan pemasangan pada delphi.
- Delphi akan menampilkan pesan bahwa komponen telah terinstall jika instalasi berhasil.
- Buka program Delphi dan buatlah sebuah project, misal project exportdb2excel
- Tambahkan komponen-komponen seperti berikut :
- ZConnection1 : untuk koneksi ke database (Zeos Component), atau bisa menggunakan komponen koneksi database yang lain.
- ZQuery1 : untuk select tabel dari database yang akan di export ke excel
- scExcelExport1 : komponon untuk eksekusi export ke excel
- DBGrids : untuk menampilkan data dari database yang akan di export ke excel
- ds1 : data source untuk menghubungkan DBGrids ke database agar data tampil dalam DBGrids
- Tombol Export : untuk memasukkan script export ke excel
- Setelah project dibuat kemudian atur properties setiap komponen sehingga database dapat terkoneksi dan dapat menampilkan data di dalam DBGrids. //bahasan koneksi database tidak dibahas disini
-
Masukkan kode perintah berikut dalam eksekusi tombol EXPORT
with scExcelExport1 do begin Dataset := ZQuery1; ExportDataset; Disconnect(); end;
- Run project dan silahkan tekan tombol export. Jika berhasil maka akan menampilkan data excel sesuai database yang tampil dari query yang diperintahkan.
- Selesai. ** semoga bermanfaat.