Kamis, 27 Februari 2014

Memformat Bilangan Pecahan di Delphi

Dalam Delphi ada sebuah fungsi yang dapat digunakan untuk memformat bilangan pecahan atau float. Tentu kita pernah atau bahkan sering membuat aplikasi yang didalamnya ada operasi matematis seperti penjumlahan, perkalian dan pembagian. seringkali dalam hasil pembagian kita akan menjumpai bilangan pecahan meskipun dalam beberapa kasus pembagian hasilnya adalah bilangan bulat.

Dengan Function FormatFloat() yang ada di Delphi kita dapat dengan mudah memformat hasil pembagian dengan output pecahan. Suatu misal kita hanya ingin mengambil dua angka dibelakang koma atau mungkin bahkan ingin menjadikannya bilangan bulat. Sebuah Contoh Bilangan Pecahan adalah 987.4321

1. Berikut coding jika saya tidak ingin mengambil angka dibelakang koma
FormatFloat('#####', pecahan);

2. Berikut coding jika saya hanya akan mengambil dua angka dibelakang koma
FormatFloat('#.##', pecahan);

2. Berikut coding jika saya hanya akan mengambil satu angka dibelakang koma
FormatFloat('0.0', pecahan);

Contoh Projek untuk implementasi Fungsi Format Float tersebut dapat anda download disini.

Tidak ada komentar:

Posting Komentar