Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Fijar separador de decimales (https://www.clubdelphi.com/foros/showthread.php?t=73776)

darkerbyte 16-05-2011 18:13:28

Fijar separador de decimales
 
Hola Amigos.

Prodrian darme algun tip sobre cómo dejar fijados los separadores de decimales en mi aplicacion y que sea independiente del windows. Ya puse este bloque en el FormCreate:

{Configuracion regional y de idioma}
CurrencyString:='$';
ThousandSeparator:=',';
DecimalSeparator:='.';

Sin embargo en el transcurso del uso del programa por alguna mistica y extraña razon que atribuyo a los poderes de Satan se cambian al formato de España (1.234.56).

Ya revisé todas las configuraciones de Windows (regional y de Idioma)y estan correctas (Español Mexico), al parecer es algun programa externo que hace el cambio temporal en Windows, aún asi esto no debería ser problema si la aplicacion definiera su propia configuración para los decimales

Mil Gracias por su ayuda

ulice 16-05-2011 22:49:34

Posible respuesta
 
Supongo que para eso, debes realizar dos pasos.
el primero es asignar al separador decimal que tu quieres por defecto en el dpr del proyecto, editando la siguiente linea.

DecimalSeparator:='.'; ó DecimalSeparator:=',';

Así cada operación que se ejecute internamente se usará el pundo decimal

El otro paso sería hacer una pequeña función en los objetos mediante el cual vas a introducir datos para que cada vez que se introdusca un separador decimal diferente al que quieras se convierta al otro.

por ejemplo.
Si lo que quieres es que todo sea operado con "."
entonces creas una función que convierta la "," en "."

ecfisa 17-05-2011 00:41:10

Hola darkerbyte.

Al finalizar de asignar las configuraciónes usa:
Código Delphi [-]
 {Configuracion regional y de idioma}
  ...
  ...
  UpdateFormatSettings:= False;
Poniendo en falso esta propiedad evitas que las configuraciones se actualizen de forma automática. Sólo es necesario declararlo al inicio de la aplicación y se mantiene mientras esta esté activa.

Saludos.

Casimiro Notevi 17-05-2011 01:21:32

Cita:

Empezado por ecfisa (Mensaje 400224)
UpdateFormatSettings:= False;

Eso no lo sabía yo :rolleyes:

ecfisa 17-05-2011 01:34:32

Hola Casimiro.

Que bueno que acotaste, por que lo escribí de memoria (cada vez tengo que confiar menos en ella :D) y al leer tu post me acordé que es:
Código Delphi [-]
  Application.UpdateFormatSettings:= False;

Un saludo.

Casimiro Notevi 17-05-2011 01:41:49

Pues ya verás la memoria que te queda cuando llegues a mi edad :) :( :D

newtron 17-05-2011 09:44:46

Oye Casimiro, ¿qué comerá el amigo ecfisa para saber tanto? ¿lo venderán aquí en España? :D

Casimiro Notevi 17-05-2011 11:18:15

Cita:

Empezado por newtron (Mensaje 400254)
Oye Casimiro, ¿qué comerá el amigo ecfisa para saber tanto? ¿lo venderán aquí en España? :D

No sé, creo que es la edad, seguro que tiene unos pooooooocos años menos que yo... y que tú :D

ecfisa 17-05-2011 13:34:41

Como es la cosa ¿ no ?

Cada vez que yo los leo me pregunto que será lo que comen ustedes... :rolleyes: :D

Un saludo.

Cañones 17-05-2011 15:33:16

Gracias.
Nunca tuve problemas en los sistemas que configuro el separador decimal, de miles y fecha, pero por las dudas le voy a agregar la instrucción por las dudas.
Gracias nuevamente.

newtron 17-05-2011 16:50:06

Cita:

Empezado por Cañones (Mensaje 400289)
Gracias.
Nunca tuve problemas en los sistemas que configuro el separador decimal, de miles y fecha, pero por las dudas le voy a agregar la instrucción por las dudas.
Gracias nuevamente.

Yo si que he tenido algún problema cuando me he encontrado con sistemas a los que habían cambiado la configuración regional por defecto. La verdad es que ni me había planteado que eso se pudiera configurar desde el programa y al leer este hilo ya lo he implementado en mi software. :D

darkerbyte 17-05-2011 16:54:34

Gracias
 
Gracias por su respuesta, probare y espero que con esto funcione. Aunq me siento un poco ignorado por la tangente que tomaron sobre los alimentos para los genios... snif snif...

Jaja, ok, si averiguan cual es el alimento me pasan la receta, haber si lo conocemos aqui en México o si lo podemos importar. Saludos

newtron 17-05-2011 16:57:00

Cita:

Empezado por darkerbyte (Mensaje 400298)
Gracias por su respuesta, probare y espero que con esto funcione. Aunq me siento un poco ignorado por la tangente que tomaron sobre los alimentos para los genios... snif snif...

Jaja, ok, si averiguan cual es el alimento me pasan la receta, haber si lo conocemos aqui en México o si lo podemos importar. Saludos

¿Sabes qué pasa? que los genios estos que tenemos por aquí no quieren soltar el secreto. :p

darkerbyte 17-05-2011 16:59:44

Que bien!
 
Cita:

Empezado por newtron (Mensaje 400297)
Yo si que he tenido algún problema cuando me he encontrado con sistemas a los que habían cambiado la configuración regional por defecto. La verdad es que ni me había planteado que eso se pudiera configurar desde el programa y al leer este hilo ya lo he implementado en mi software. :D

Me alegro que este tópico haya servido para al menos una persona más

Casimiro Notevi 17-05-2011 17:15:18

Cita:

Empezado por newtron (Mensaje 400299)
¿Sabes qué pasa? que los genios estos que tenemos por aquí no quieren soltar el secreto. :p

Yo no tengo secretos, eso quiere decir que no soy un genio :D

ecfisa 17-05-2011 17:34:25

Lo voy a revelar. Lo que es bueno para aumentar la inteligencia es el pescado...
Y de eso doy fe, para poder terminar la primaria tuve que comer dos tiburones blancos por día durante 7 años. :(:D

Saludos.

darkerbyte 17-05-2011 17:45:13

El secreto ha sido revelado
 
Cita:

Empezado por ecfisa (Mensaje 400308)
Lo voy a revelar. Lo que es bueno para aumentar la inteligencia es el pescado...
Y de eso doy fe, para poder terminar la primaria tuve que comer dos tiburones blancos por día durante 7 años. :(:D

Saludos.

Gracias Ecfisa por revelar el secreto, ahora, lo mejor es que borres este mensaje, por tu propia seguridad. O tendras a GreenPeace tras de ti por comer 5110 Tiburones Blancos. Nota, ahora sabemos quien es el causante de que esta especie este en peligro de extinción.

:D

Casimiro Notevi 17-05-2011 17:48:17

Cita:

Empezado por ecfisa (Mensaje 400308)
Lo voy a revelar. Lo que es bueno para aumentar la inteligencia es el pescado...

Bueno, entonces haremos un esfuerzo, empezaremos con esto:




La franja horaria es GMT +2. Ahora son las 01:04:47.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi