Membuat DBGrid Berwarna

Bosan dengan tampilan DBGrid yang itu-itu saja, ubah tampilan DBGrid sobat jadi kombinasi berwarna sehingga sobat maupun user tidak bosan terhadap tampilan tabel tersebut selain itu lebih memudahkan untuk mengecek data tabel tersebut. Bagaimana cara membuat DBGrid menjadi berwarna sobat bisa lihat caranya sebagai berikut :

1. Klik pada komponen DBGrid kemudian pada Object Inspector pilih Event lalu pilih Event DrawColumnCell  kemudian klik dua kali.
2. Kemudian sobat masukan kodenya sebagai berikut : 
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState); 
begin 
if DBGrid1.DataSource.DataSet.RecNo mod 2 =0 then
DBGrid1.Canvas.Brush.Color := clskyBlue; //pilih warnanya
DBGrid1.DefaultDrawColumnCell(rect, datacol, column, state); 
end;
3. Bila sudah menuliskan kodenya silahkan sobat jalankan aplikasinya dengan menekan tombol F9.

~selamat mencoba~

Related Post:

l/Pemrograman

• Cara Membuat Database dengan Access 2007
• Fungsi Dasar SQL
• Cara Menambah Komponen Quick Reports pada Delphi 7
• IDE Delphi 7
• Istilah Dalam Database
• Data Module Pada Delphi
• Variabel dan Konstanta di Visual Basic
• Membuat Aplikasi Trial Version Menggunakan Delphi
• Instal Delphi 7 Di Windows 7
• Belajar Delphi 7
• Cara Memasukan Record Ke Dalam ComboBox
• Cara Memasukan Flash ke Delphi 7
• Fungsi Dalam C++
• C++
• Membuat Digital Clock di Flash
• Konsep ADO pada Delphi