Monday, 6 February 2017T2/06/2017 09:30:00 pm

CARA MUDAH MENAMPILKAN FORMAT CURRENCY DI DBGRID DELPHI

Salam blogger…….pada postingan kali ini saya akan share cara mudah menampilkan format currency / Ribuan di dbgrid Delphi, format currency biasa digunakan untuk proses perhitungan, setiap angka ribuan akan dibatasi dengan titik aatau koma, tujuan nya agar mudah dapat dibaca oleh user, contoh kita akan lebih mudah membaca format 150.000,00 dibandingkan dengan format biasa misalnya 150000. Format currency ini juga digunakan agar memperkecil kesalahan dalam proses pembacaan data maupun proses perhitungan pada program Delphi yang kita buat, lalu berkaitan dengan judul artikel diatas disini saya akan membahas cara mudah menampilkan field dengan format currency di dbgrid Delphi.

Untuk dapat menampilkan format currency di dbgrid Delphi sebenarnya dapat dilakukan dengan 2 cara, yaitu ditampilkan dengan mengatur settingan currency pada field di dbgrid dan bisa juga ditampilkan dengan menambahkan coding program format currency pada event OnActive di form project Delphi sobat. Kali ini saya akan membahas kedua cara tersebut.

1. Menampilkan format currency dengan settingan

Untuk dapat menampilkan format currency di dbgrid dengan setingan dapat dilakukan dengan mudah, disini saya anggap sobat sudah membuat form nya di Delphi, cara nya tingggal klik 2x pada Adotable1 (atau adoquery1 jika menggunakan adoquery1) lalu pada jendela form baru klik kanan lalu pilih add all fields . lalu pilih field yang ingin ditampilkan pada dbgrid, selanjutnya pada object inspector cari kata currency lalu centang pada kotak box true. (lihat pada gambar dibawah). Jika sudah maka secara otomatis field yang dipilih pada dbgrid akan menampilkan format currency.

2. Menampilkan format currency dengan coding program

Selanjutnya pada cara yang kedua ini kita akan menampilkan format nya dengan coding program, cara nya adalah pada object inspector form nya pilih event OnActive lalu klik 2x lalu masukan coding program dibawah ini tepat dibawah begin :
procedure TForm1.FormActivate(Sender: TObject);
begin
TFloatField(Adotable1.fieldbyname('TarifSewa')).DisplayFormat := '#,#0.00;(#,#0.00);#,#0.00 ';
end;


Penjelasan :

  - TarifSewa = Merupakan Nama field di tabel yang ingin ditampilkan  format currency

  - Format '#,#0.00; = format bernilai positif

  - Format (#,#0.00); = format bernilai Negatif

  - Format #0.00 '; = format bernilai 0

Demikian postingan saya kali ini yang dapat saya share tentang cara menampilkan format currency / ribuan di dbgrid Delphi, silahkan sobat pilih cara yang menurut sobat mudah untuk diterapkan. Semoga artikel saya kali ini dapat bermanfaat bagi sobat semua dan selamat mencoba.
Previous
Next Post »
0 Komentar untuk "CARA MUDAH MENAMPILKAN FORMAT CURRENCY DI DBGRID DELPHI"

Silahkan tinggalkan komentar dibawah ini,
Terima kasih sudah :
1. Berkomentar dengan sopan
2. Tidak meninggalkan link aktif dalam form komentar
3. Berkomentar sesuai postingan / artikel
4. Tidak membuat komentar yang mengandung SARA / SPAM
5. Memberikan informasi link / script yang tidak berfungsi

Terima Kasih Sudah Berkomentar

PENDAPAT ANDA TENTANG BLOG INI ?

Follow by Email

 
Copyright © 2014 uduy macal blog's - All Rights Reserved
Template By Kuncidunia
DMCA.com Protection Status