function commaFormat tNum
put tNum mod 1 into remainder
delete char 1 of remainder
put trunc(tNum) into tNum
put the number of chars in tNum into n
repeat with i = 1 to trunc((n-1)/3)
put comma after char n - 3*i of tNum
end repeat
return tNum& remainder
end commaformat
function currencyFormat tNum
put commaFormat(tNum) into sNum
return "$" & sNum
end currencyFormat
should be useful.
--
View this message in context:
http://runtime-revolution.278305.n4.nabble.com/Is-it-really-this-hard-to-print-currency-values-tp4652980p4652981.html
Sent from the Revolution - User mailing list archive at Nabble.com.
_______________________________________________
use-livecode mailing list
use-livecode@lists.runrev.com
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-livecode
