Cambiar tamaño de fuente en tiempo real

[Josber]

He estado mirando, pero no encuentro nada, así que creo que no está preguntado

He probado a cambiar el tamaño de fuente de un texto en tiempo real con la sentencia

      MOVE 12,50 TO "Size" OF "Font" OF INFORMACION1

pero al ejecutar, (no da error de compilación), me indica

the property value is invalid

Con lo que me indica que el Método "Size", no es el correcto, sin embargo con, por ejemplo el Método "Name", funciona perfectamente

¿Alguien sabe cómo se hace?

[Fito]

Hola @Josber,

Qué control es, un cuadro de texto?

- - - Updated - - -

Fijate en este proyecto adjunto.

El problema es el tipo de dato.

Saludos.

Fito...

[fastpho]

He estado mirando, pero no encuentro nada, así que creo que no está preguntado

He probado a cambiar el tamaño de fuente de un texto en tiempo real con la sentencia

      MOVE 12,50 TO "Size" OF "Font" OF INFORMACION1

pero al ejecutar, (no da error de compilación), me indica

the property value is invalid

Con lo que me indica que el Método "Size", no es el correcto, sin embargo con, por ejemplo el Método "Name", funciona perfectamente

¿Alguien sabe cómo se hace?

Hola @Josber el problema es la coma , no te da error al compilar , por que debe tener puesto decimal point is coma
si cambias la coma por el punto tiene que funcionar

MOVE 12.50 TO "Size" OF "Font" OF OF INFORMACION1

Saludos

[Josber]

Gracias a lo s 2, @Fito, el caso es que es así como lo tengo y no funcionaba, con la salvedad de que no muevo una constante, si no una variable, por lo que realmente la sentencia auténtica es

MOVE "Text" OF CAMPO50 TO "Size" OF "Font" OF INFORMACION1

Donde CAMPO50 está definido como PIC ZZ9,99, lo que pasa es que puse el otro ejemplo, porque era el cambio que había hecho para hacer las pruebas, curiosamente, pasando una constante sin decimales, (8 en éste caso), también da error, por lo que creo que @fastpho, no va mal encaminado.

@fastpho, no, el problema aparentemente si usas variables y no constantes, no son los decimales, aunque sí me has dado la pista, el problema es que cuando lo pasas directamente como lo he hecho yo, por lo visto, el RunTime, no hace bien la conversión y lo pasa en el formato editado, (gran cagada diría yo), si lo cambiamos por

MOVE POW-NUMERIC OF CAMPO50 TO "Size" OF "Font" OF INFORMACION1

donde no pasa el editado, si no el numérico y, a funcionar, con una instrucción de PWC3, funciona, así que espero que nunca pierda la retrocompatibilidad, si no ....

Mil gracias

Un salu2.-

[Fito]

MOVE "Text" OF CAMPO50 TO "Size" OF "Font" OF INFORMACION1

Esto no funciona, porque la propiedad "Text" es un string, no es numérico.

Fijate de ejecutar el proyecto que te paso, está funionando. A este le puse un decimal.

Tené en cuenta que no todos los tipos de letras tienen todas las medidas.


Saludos.

Fito