Currency

//Currency

{
Currency adalah Tipe data Yang Hampir Sama dengan integer dan float ...
Bedanya Currency Memiliki Pembatas , Seperti (.) ...
Sering digunakan Untuk Format UANG ... seperti 20.000 ... nah seperti itu currency ...

Tentunya Dengan Format Pengaturan ...
Contohnya

}

Var a:Currency ;
Begin
a:=20000;
Edit1.text := formatcurr('#,###' , a) ;
end;

{ Maka Jadinya Akan Seperti ini 20.000}
{ Format Pengaturan Currency Seperti Diatas '#.###' , tiga #(Pagar)  ini Maksudnya 3 angka Sebelum Titik}
{ Jika anda Masukkan 20000000 maka akan jadi 20.000.000}