MoneyFormat()

Dude · Post by **Dude** » Thu Jun 09, 2016 1:45 pm

I prefer this over FormatNumber(), as it uses local PC settings for the currency symbol, decimal separator, and thousands separator:

Code: Select all

Procedure.s MoneyFormat(amount.d)
  m$=Space(999)
  GetCurrencyFormat_(0,0,StrD(amount,2),0,@m$,990)
  ProcedureReturn m$
EndProcedure

Debug MoneyFormat(91397.45000) ; $91,397.45

This is how FormatNumber() should work, IMO.

infratec · Post by **infratec** » Fri Jun 10, 2016 6:49 am

This is how FormatNumber() should work

And what if I don't want a currency in front?

Should I then use Trim()

Dude · Post by **Dude** » Fri Jun 10, 2016 1:15 pm

Yep.

Or: ProcedureReturn Mid(m$,2)

cas · Post by **cas** » Fri Jun 10, 2016 3:24 pm

Beware, some locales have currency symbol in front of numbers and some at end. Do not use Trim() od Mid() if your app will be available to users from different countries. Here are some examples:
Germany:

Code: Select all