| Autor |
Mensaje |
 v3ctor 
Analista Programador
Registrado: May 2013
Mensajes: 1786
Edad: 44 Ubicación:  Uruguay
|
 Averiguar Que Tipo De Moneda Usa El Sistema Operativo?
buenas,
La idea de esto es averiguar que tipo de moneda usa el sistema operativo y en base a eso usar el signo de moneda en nuestro programa
alguna idea?
=================== Software libre, programación libre, vida libre es la Public function Libertad()as Invendible 
Proyectos: VisorRV1960,Taller2015,Tanteador
https://sourceforge.net/u/v3ctor-full/profile/
Blog: http://novatocodegambas.blogspot.com.uy/
|
#1 Domingo, 20 Diciembre 2015, 02:20 |
|
 |
vuott
Analista Programador
Registrado: Agosto 2013
Mensajes: 2086
Edad: 60 Ubicación: 
|
Re: Averiguar Que Tipo De Moneda Usa El Sistema Operativo?
Actualmente sólo puedo sugerir este código, utilizando unas funciones externas de Libc.so.6:
|
#2 Domingo, 20 Diciembre 2015, 03:31 |
|
|
Shell
Analista Programador
Registrado: Marzo 2010
Mensajes: 5278
Edad: 53 Ubicación:  Al otro lado de la pantalla
|
Re: Averiguar Que Tipo De Moneda Usa El Sistema Operativo?
Pues si que es raro que la clase System no tenga esa opción. 
=================== Gambas Básico
"No es un bug, es una característica no documentada"
|
#3 Domingo, 20 Diciembre 2015, 10:30 |
|
|
Shell
Analista Programador
Registrado: Marzo 2010
Mensajes: 5278
Edad: 53 Ubicación: Al otro lado de la pantalla
|
Re: Averiguar Que Tipo De Moneda Usa El Sistema Operativo?
¿ No debería el sistema decirnos todos estos datos y no solo mostrar el mismo resultado que vemos ?.
Salida:
Citar:
LC_PAPER=es_ES.UTF-8
LC_ADDRESS=es_ES.UTF-8
LC_MONETARY=es_ES.UTF-8
LC_NUMERIC=es_ES.UTF-8
LC_TELEPHONE=es_ES.UTF-8
LC_IDENTIFICATION=es_ES.UTF-8
LC_MEASUREMENT=es_ES.UTF-8
LC_TIME=es_ES.UTF-8
LC_NAME=es_ES.UTF-8
Saludos
=================== Gambas Básico
"No es un bug, es una característica no documentada"
|
#4 Domingo, 20 Diciembre 2015, 12:32 |
|
|
Shell
Analista Programador
Registrado: Marzo 2010
Mensajes: 5278
Edad: 53 Ubicación: Al otro lado de la pantalla
|
Re: Averiguar Que Tipo De Moneda Usa El Sistema Operativo?
En gambas se podría ver de otra forma, pero no veo lo que nos interesa.
Como Application.Env es una colección, podemos usar varentorno como clave y luego para encontrar el valor que corresponde a la clave.
Salida:
Citar:
LC_TIME | es_ES.UTF-8
LC_MONETARY | es_ES.UTF-8
LC_ADDRESS | es_ES.UTF-8
LC_TELEPHONE | es_ES.UTF-8
LC_NAME | es_ES.UTF-8
LC_MEASUREMENT | es_ES.UTF-8
LC_IDENTIFICATION | es_ES.UTF-8
LC_NUMERIC | es_ES.UTF-8
LC_PAPER | es_ES.UTF-8
Saludos
=================== Gambas Básico
"No es un bug, es una característica no documentada"
última edición por Shell el Domingo, 20 Diciembre 2015, 12:59; editado 2 veces |
#5 Domingo, 20 Diciembre 2015, 12:57 |
|
|
vuott
Analista Programador
Registrado: Agosto 2013
Mensajes: 2086
Edad: 60 Ubicación:
|
Re: Averiguar Que Tipo De Moneda Usa El Sistema Operativo?
Shell,
tu codigo no me da ningún resultado ! 
|
#6 Domingo, 20 Diciembre 2015, 17:15 |
|
|
Shell
Analista Programador
Registrado: Marzo 2010
Mensajes: 5278
Edad: 53 Ubicación: Al otro lado de la pantalla
|
Re: Averiguar Que Tipo De Moneda Usa El Sistema Operativo?
Vuott:
Citar:
tu codigo no me da ningún resultado !
Cierto. En el trabajo se ve y en casa no. 
Y es la misma distro!. Linux Mint 17.2
Como has visto he usado Instr, para buscar las palabras que contengan o comiencen por LC.
Parece que no hay palabras en las variables de entorno que coincidan con ese patrón...
Si usas:
Veras que da salida. Aunque no es la que nos interesa.
Saludos
=================== Gambas Básico
"No es un bug, es una característica no documentada"
|
#7 Domingo, 20 Diciembre 2015, 18:38 |
|
|
vuott
Analista Programador
Registrado: Agosto 2013
Mensajes: 2086
Edad: 60 Ubicación:
|
Re: Averiguar Que Tipo De Moneda Usa El Sistema Operativo?
En Ubuntu muy interesantes son los archivos que están en la directory:
/usr/share/i18n/locales
En cada archivo, distinguido por LANG, hay tambien la moneda y su símbolo.
Propongo un codigo (esta vez sólo gambas !) como lo que sigue:
Public Sub Main()
Dim lengua, locales, arcloc, unicode, moneda As String
Dim b As Byte
locales = "/usr/share/i18n/locales"
lengua = Scan(System.Language, "*.*")[0]
arcloc = File.load(locales &/ Dir(locales, lengua, gb.File)[0])
unicode = Scan(Replace(arcloc, " ", Null), "*int_curr_symbol\"<U*<U0020>*")[1]
For b = 1 To 18 Step 7
moneda &= Chr(Val("&" & Mid(unicode, b, 4)))
Next
Print "Moneda: "; moneda
unicode = Scan(Replace(arcloc, " ", Null), "*currency_symbol\"<U*>*")[1]
Print "Símbolo monetario: "; String.Chr(Val("&" & unicode))
End
última edición por vuott el Domingo, 20 Diciembre 2015, 21:57; editado 8 veces |
#8 Domingo, 20 Diciembre 2015, 18:50 |
|
|
Shell
Analista Programador
Registrado: Marzo 2010
Mensajes: 5278
Edad: 53 Ubicación: Al otro lado de la pantalla
|
Re: Averiguar Que Tipo De Moneda Usa El Sistema Operativo?
Vuott:
Citar:
Propongo un codigo (esta vez sólo gambas !) como lo que sigue
Tengo que examinar mejor el código.
Saludos
=================== Gambas Básico
"No es un bug, es una característica no documentada"
|
#9 Lunes, 21 Diciembre 2015, 10:10 |
|
|
Shell
Analista Programador
Registrado: Marzo 2010
Mensajes: 5278
Edad: 53 Ubicación: Al otro lado de la pantalla
|
Re: Averiguar Que Tipo De Moneda Usa El Sistema Operativo?
Citar:
La idea de esto es averiguar que tipo de moneda usa el sistema operativo y en base a eso usar el signo de moneda en nuestro programa
A ver. Creo que nos hemos ido al monte a buscar la respuesta..
Salida:
Citar:
Símbolo monetario: €
Moneda: EUR
Ejem...cof..cof... 
Saludos
=================== Gambas Básico
"No es un bug, es una característica no documentada"
|
#10 Lunes, 21 Diciembre 2015, 11:50 |
|
|
|
|
Foro 
