[Sintaxis] Cambiar el punto decimal por coma

[Josber]

Si entendemos, por lo menos yo, perfectamente lo que quieres hacer, pero insisto, sin tocar nada de programa, lo veo imposible.

Un saludo.-

[Kuk]

Josber, a mí me parece que yo no me estoy enterando, porque la pregunta la veo clara y las respuestas también, pero insiste en lo suyo... Con lo cual, a lo mejor está diciendo otra cosa, no sé...

Joseg, no se puede sustituir el punto por la coma y viceversa de otra manera. O cambias el programa, o cambias la configuración de Windows. Porque el programa recibe las señales de las teclas por Windows, es Windows el que envía la tecla. Entonces, sea cambias en el propio Windows, sea cambias la interpretación de dicha tecla en tu programa. Es que no hay otra solución. No existe.

[Dasije]

Existen pequeños programas residentes en memoria, que cambian lo que se introduzca como punto sea como coma al pulsar la tecla en el teclado numérico.

Yo recuerdo que Andrés Montes para sus aplicaciones de modo texto, no podía cambiar este parámetro y utiliza un exe que llamaba cuando arrancaba el programa y se quedaba en memoria cuando entraban los usuarios en el terminal server y después al cerrar la aplicación se quitaba de la memoria, y cumplia esta misión.

Yo en las aplicaciones en Power, lo que hago es mover lo que pulsa como punto se convierta a coma cuando en el keypress en los campos de importes/cantidades con decimales.

[Josber]

❞ Existen pequeños programas residentes en memoria, que cambian lo que se introduzca como punto sea como coma al pulsar la tecla en el teclado numérico.

Eso lo sabemos, pero el problema que tenían esos programas es que lo cambiaban para todo, fuera un texto o un número.

Un saludo.-

[Rapinto]

Joseg,

Não sei se isto obriga a por este código em todas as Forms!!
Mas resolve, penso eu, o problema.
Nos eventos da Form em PreKeyDown, coloca o seguinte código:

       IF POW-ARG-KEYCODE = 110
          MOVE 188 TO POW-ARG-KEYCODE.

Saludo,
Rui

[Joseg]

❞ Joseg, Não sei se isto obriga a por este código em todas as Forms!! Mas resolve, penso eu, o problema. Nos eventos da Form em PreKeyDown, coloca o seguinte código:        IF POW-ARG-KEYCODE = 110           MOVE 188 TO POW-ARG-KEYCODE. Saludo, Rui

Boa dica,

Obriga a por em cada form o código, mas já é uma boa alternativa.

Obrigado

[Kuk]

Joseg, macho, te ha comentado lo mismo Josber, y lo de PreKeyDown yo y decías que no entendíamos lo que querías hacer ???

[Rapinto]

Joseg,

Eu criei em cada "form" uma propriedade : IsNumeric

No PreKeyDown fica o código:

    IF IsNumeric OF POW-SELF = POW-TRUE
       IF POW-KEYCODE = 110
          MOVE 188 TO POW-KEYCODE.

No GotFocus dos campos numéricos:

*
    MOVE POW-TRUE TO IsNumeric OF POW-SELF.

No LostFocus de cada campo numerico:

    MOVE POW-FALSE TO IsNumeric OF POW-SELF.

Com este código, consigo substituir o ponto decimal do Numeric Keypad pela virgula (comma) só nos campos numéricos. Nos campos alfa o ponto mantem-se como ponto.

Isto é outra alternativa, um pouco mais trabalhosa, mas mais perfeita.

Saludo,
Rui Pinto

[Galileo]

Entiendo qué es lo que quiere hacer Joseg. No se cuales son las diferencias entre PowerCOBOL 3.0 y las versiones posteriores, pero en esta versión basta con indicar en el evento SPECIAL-NAMES de la pantalla principal el clásico

DECIMAL-POINT IS COMMA.

. Así, convierte la pulsación del punto decimal en coma sólo en los campos numéricos.

❞ ... basta con indicar en el evento SPECIAL-NAMES de la pantalla principal...

Perdón, quería decir del form.

[Kuk]

Galileo, no se trata de campos COBOL, sino que de los controles EDIT que no tienen nada que ver.