Menampilkan Format Ribuan Pada DBGrid

Hi…sobat kali ini saya akan bagi ilmu tentang bagaimana menampilkan format ribuan pada DBGrid dan juga muncul Rupiahnya. Untuk memunculkan format ribuan pada DBGrid ada 2 cara yang bisa dilakukan yaitu cara pertama bisa pake coding dan kedua bisa pake cara visual artinya tinggal di setting aja. Pada kesempatan ini saya akan mencoba kedua cara tadi. Pada percobaan ini saya akan memunculkan format ribuan pada field Gaji_Pokok dengan Total_Gaji (Lihat gambar dibawah).

OK langsung aja kita simak cara-caranya.

1 Pake Coding => pada Events OnActivate masukan source code dibawah ini. (Lihat gambar)

TFloatField(ADOQuery1.FieldByName('Gaji_Pokok')).DisplayFormat:='Rp #,###';

TFloatField(ADOQuery1.FieldByName('Total_Gaji')).DisplayFormat:='Rp #,###';

Uji coba hasil jalankan program

2. Pake Cara Visual

Klik 2x pada komponen ADOQuery. Setelah muncul Form1.ADOQuery, klik kanan disitu lalu pilih Add all fields

Setelah muncul semua field-fieldnya, pilih field yang mau di ubah formatnya (Gaji_Pokok dengan Total_Gaji). Kemudian di Properties pada DisplayFormat masukan Rp #,### lalu ENTER. Coba lihat pada DBGridnya muncul tidak formatnya? Kalo muncul berarti udah berhasil.