Menambahkan Komponen Combobox didalam DBGrid Delphi

1. Pastikan Tidak ada Masalah Dengan Koneksi Database, Maupun Proses Input atau Delete Pada Program Anda. Jika Masih ada Masalah silahkan baca postingan sebelumnya tentang Koneksi Database MySQL dan Input, Update dan Delete.

2. Pada Contoh Ini admin menggunakan Konektor ZEOS. Sebenarnya sama saja dengan ODBC

3. Buat dua Buah Tabel Pada Database Anda
   - Tabel User (Datanya akan ditampilkan Pada DBGRID) -> 3 Field (Nomor, Username, Keterangan)
   - Tabel Keterangan (Datanya akan ditampilkan Pada Combobox) -> 2 Field (Nomor dan Keterangan)

4. Untuk Desain Formnya Seperti dibawah ini :
   - 1 Buah DBGRID
   - 1 Buah Connector ZEOS
   - 2 Buah ZQUERY (Zquery1 Untuk Tabel User dan ZQuery2 Untuk tabel Keterangan)
   - 1 Buah Datasource
   - 1 Buah Combobox

5. Set Property Combobox -> Visible = False
6. Tambahkan Code ini dalam Event Form Show :

var
i : integer;
begin
for i := 1 to ZQuery2.RecordCount do
begin
ComboBox1.Items.Add(ZQuery2['Keterangan']);
ZQuery2.Next;
end;
end;

7. Tambahkan Code ini didalam Event DBGRID onDrawColoumcell

DBGrid1.Columns[2].PickList:=ComboBox1.Items;

8. Hasil Akhirnya Seperti ini :

Mewarnai DBGrid

Topik Kali ini kita akan bermain-main dengan DBGRID. Admin sendiri bosan dengan Warnanya yang monoton dan Itu Itu saja. untuk itu mari kita coba melakukan sedikit modifikasi pada DBGrid. Caranya cukup simpel. Hanya dengan menambahkan code ini didalam event onDrawColoumCell milik DBGRID :

Untuk Alternatif Jika anda tidak mau menggunakan komponen DBGRID bawaan Delphi, Ada Komponen Pengganti DBGrid yang dapat Sobat Coba. Namanya Komponen DBGRIDEH. Silahkan baca pada postingan saya disini. Untuk cara menggunakannaya silahkan baca disini.

1. Tambahkan dua Variabel :

   gridwarna : TDBGrid;
   warnarow : integer;

2. Tambahkan Code ini Setelah Begin

//Memberi Warna yang berbeda pada DBGrid
    gridwarna := sender as TDBGrid;
    warnarow := gridwarna.DataSource.DataSet.RecNo;
    if Odd(warnarow) then
    gridwarna.Canvas.Brush.Color := clyellow // Ganti Warnanya Sesuai Kebutuhan
    else
    gridwarna.Canvas.Brush.Color := clgreen; // Ganti Warnanya Sesuai Kebutuhan
    gridwarna.DefaultDrawColumnCell(Rect, DataCol, Column, State) ;

Dan Hasilnya :

Komponen Pembaca File SHP Delphi

Untuk Membuat Aplikasi GIS (Geographic Information System atau Sistem Informasi Geografis) kita membutuhkan komponen Tambahan untuk membaca file *.shp Karena secara default Delphi tidak menyediakan komponen untuk membaca file shp.

Nama Komponen ini adalah SVO, Berjalan dengan Cukup Stabil di Delphi 7 karena saya sudah pernah mencobanya untuk membuat untuk belajar membuat aplikasi sederhana System Informasi Geografis meskipun akhirnya saya memutuskan untuk menggunakan PMAPPER Framework (Framework GIS Web Based).

Sebenarnya komponen ini dapat juga digunakan untuk melakukan editing file shp. untuk lebih jelasnya silahkan dicoba sendiri. Download Komponennya disini

Sekedar Informasi, Hasil Install akan berada disini : C:\Program Files\Borland\Delphi X\SVO

Berikut Gambar Demonya :

Selamat Berkreasi Sobat Delphi :)

Modul Delphi Untuk Pemula

Postingan ini berisi modul Delphi Untuk Pemula yang selama ini Admin gunakan untuk belajar Delphi. Perlahan Tapi Pasti dengan Mencoba Hal-Hal Kecil Akhirnya admin jadi banyak tahu tentang Delphi. Ebook ini atau mungkin lebih tepat jika disebut Modul. sangat Admin Rekomendasikan untuk seorang yang baru mulai belajar Delphi (Pemula).

Modul Ebook ini bukan hasil tulisan saya. Ini adalah modul pemrograman Visual yang digunakan di kampus saya. Sengaja Saya Sharing Buat Sobat Delphi yang ingin Belajar dan memperdalam Ilmu delphi. Bukankah Ilmu Untuk disebarkan ? Saya Sendiri Suka dengan Orang yang semangat belajarnya tinggi. Apalagi Belajarnya menggunakan Metode Otodidak. Tidak Manja dan banyak tanya. Tapi kalau kesulitan ya harus bertanya agar tidak tersesat. :)

Dalam Modul ini dibahas tentang Delphi Secara Detail. Mulai dari Pengenalan Delphi Hingga Praktek Membuat Prosedur dan Fungsi Sendiri. bagi Sobat yang penasaran dengan modul ini silahkan Download disini. Akhir kata Admin ucapkan. Selamat belajar dan Jayalah Indonesiaku.

eBook Membuat Komponen Sendiri di Delphi

Object Oriented Programming adalah sebuah metode Pemrograman berbasis Objek. Bukan Menggunakan Sintax atau Tools yang berbeda karena yang berbeda hanya Konsep Programmingnya (Penulisan Code). Jika Sebelumnya anda Akrab dengan Metode Prosedural atau bahasa kerennya Coding Spageti, Maka Konsep OOP akan sedikit lebih membingungkan (Pengalaman Pribadi). hehe

Berikut saya sharing Sebuah ebook panduan Menguasai Konsep OOP di Delphi Beserta bagaimana membuat komponen sendiri. Ebook ini admin dapatkan dari Srcribd. Tentu saja Penulisnya Bukan Admin. ketimbang numpuk di harddisk lebih baik kan di share ke sobat Delphier. Dalam ebook ini dibahas tentang pengenalan OOP pada Delphi serta praktek Penerapan Konsep OOP alias Objek Oriented Programming pada Delphi. Selanjutnya dibahas Bagaimana Membuat Komponen Sendiri. Ebooknya dapat sobat Download disini.

Kepada Penulis eBook. Admin Mohon Maaf yang sedalam-dalamnya karena telah lancang mempublish tanpa ijin Penulis. Kita Doa'akan Semoga Penulis Masuk Surga. Amin. Akhir Kata Admin Ucapkan selamat Belajar dan Berkreasi Kepada Sobat Delphi.

Delphi di Linux

Karena Memang Delphi di khususkan untuk windows, Jadi Bagi Para Pengguna Sistem Operasi Linux, Lazarus dapat menjadi Alternatif Untuk mengganti Delphi. Seperti apa kelebihan dan kekurangannya ? Silahkan dicoba sendiri ya. karena disini admin hanya ingin sharing tentang bagaimana mendapatkan lazarus dan menginstalnya di linux anda. Lazarus merupakan Tools untuk mengcompile Code Pascal. Silahkan Download Dulu Disini

Berikut Daftar yang harus anda Download :
1. fpc_2.6.0-120824_i386.deb
2. fpc-src_2.6.0-120824_i386.deb
3. lazarus_1.0.4-0_i386.deb

Silahkan Copy Semua File Lazarus yang anda download ke Folder Home. Selanjutnya Buka Terminal Anda. Disini Admin akan mencontohkan pada Linux Mint.

1. Pada Terminal, Ketikan : Sudo Bash -> enter -> Masukan Password -> enter
2. selanjutnya ketikan (Lakukan Bertahap One by One):

dpkg -i fpc_2.6.0-120824_i386.deb -> enter
dpkg -i fpc-src_2.6.0-120824_i386.deb -> enter
dpkg -i lazarus_1.0.4-0_i386.deb -> enter

Berikut Screenshoot Hasilnya :

Aplikasi CRUD Data dan Cetak Laporan dengan Delphi

Mungkin Sudah banyak beredar didunia maya tentang aplikasi CRUD Data. Saya yakin juga sudah banyak yang sharing Aplikasi CRUD data dengan Delphi baik di forum-forum pemrograman atau di blog-blog pribadi. Namun Admin Ingin Memberikan Sedikit sentuhan yang berbeda pada Contoh aplikasi sederhana ini.

Contoh Source Code yang akan saya sharing ini sebenarnya merupakan inti dari dibangunnya sebuah aplikasi (Input, Update & Delete), Cetak Laporan serta Backup dan Restore. Sedangkan Mengenai Desain Tampilan saya kira hanya Varisasi Saja.

Ada Beberapa Hal yang akan sobat dapatkan :

- Input Data Kedalam Database MySQL
- Update Data (Database MySQL)
- Delete data (Database MySQL)
- Menyimpan Gambar kedalam Database MySQL
- Backup dan Restore Data (Database MySQL)
- Mencetak Laporan (Pertanggal) dengan QuickReport dan Database MySQL

Screenshoot :

Download :
Source Code, Datasource dan Database