Hi
I was testing how to make a library this is Locale language I make after a lot of Google search
the source from Eclipse is in the zip file
08.08.2013 Upgrade the zip file more options and Currency
10.08.2013 just planing with activity actions call settings add java and B4A in zip file
Dim f2 As GetDefaultLocale
Log(f1.Locale_country)
Log(f1.Locale_DisplayCountry)
Log(f1.Locale_DisplayLanguage)
Log(f1.Locale_DisplayName)
Log(f1.Locale_getDisplayVariant)
Log(f1.Locale_getISO3Country)
Log(f1.Locale_getISO3Language)
Log(f1.Locale_getLanguage)
Log(f1.Locale_language)
I add ZIP file to show Currency
Dim f1 As GetCurrency
Log(f1.CurrencyCode)
Log(f1.DisplayName)
Log(f1.Symbol)
it show
GBP
British Pound Sterling
£