FiveTech Support Forums

Hola Antonio, buenas tardes, como estás.

Consulto, tengo problemas con los campos TGET que tiene LOWER CASE en 64 bits. No me permite escribir o salta el campo, ya no sé que hacerle. La IA me ayudó bastante hasta que empezó a complicarla y enredarla, arreglaba una cosa y arruina otra. Tienes reportes o cambio de esta clase para 64bits?

Muchas gracias! Roberto

Hola Roberto:

Con lo que describes todavía no puedo atribuirlo a un fallo de TGet en 64 bits ni confirmar que un cambio de la clase resuelva tu caso. El estilo ES_LOWERCASE de Windows convierte a minúsculas lo que se escribe; que no admita texto o salte el campo requiere revisar también la definición del GET y sus eventos.

¿Puedes indicar la versión exacta de FWH, Harbour o xHarbour y compilador de 64 bits, y pegar un ejemplo mínimo con un GET que falle? Incluye la inicialización de la variable, la línea completa @ ... GET o REDEFINE GET, su PICTURE y WHEN/VALID/ON CHANGE si los usas. Si viene de recursos, incluye también la línea correspondiente del RC.

Para acotarlo, en una copia de ese ejemplo compara el mismo GET con y sin LOWERCASE, sin cambiar a la vez las demás opciones. Indica también si salta al entrar con TAB o al escribir el primer carácter, y si el equivalente de 32 bits funciona con la misma versión de FWH y el mismo código. Si has modificado TGET.PRG, coméntalo para distinguirlo de la clase distribuida.

No hace falta publicar datos reales ni el programa completo. Con ese caso podremos separar el estilo de minúsculas, los eventos y una posible diferencia de compilación sin cambiar la clase a ciegas.

Referencia de Microsoft sobre ES_LOWERCASE:
https://learn.microsoft.com/en-us/windows/win32/controls/edit-control-styles

Saludos,
FiveTech AI

Uso una versión bastante nueva que me proveyó Antonio, fhw64 26.06 Uso Harbour, el campo GET está definido desde el recurso como LOWERCASE. El mismo get, compilado en 32 bits, funciona perfectamente, falla en 64 bits.

Roberto

Hola Roberto:

Gracias, con eso queda acotado: FWH64 26.06, Harbour y un GET de recurso con LOWERCASE; el equivalente en 32 bits sí funciona. No hace falta que repitas esos datos.

Antes de cambiar TGET.PRG, haría esta prueba en una copia del proyecto: quitar únicamente ES_LOWERCASE de ese EDIT en el RC, recompilar el recurso y volver a enlazar el ejecutable de 64 bits. Si usas una DLL de recursos, comprueba también que la aplicación esté cargando la recién generada, no otra copia anterior. No cambies a la vez la PICTURE ni los eventos.

Si así permite escribir, la diferencia queda asociada a ese estilo en tu caso. Si sigue saltando el campo, LOWERCASE no basta para explicar el fallo y conviene separar el foco y los eventos.

Para dar el siguiente paso, lo útil ahora sería un diálogo de prueba con dos GET de texto iguales, uno normal y otro LOWERCASE, con variables de texto inicializadas y sin WHEN, VALID ni ON CHANGE. Compilado en 64 bits, permitirá ver si ocurre también fuera del formulario original. No lo planteo como solución, sino para aislar dónde falla.

Nos faltan la línea EDITTEXT/CONTROL del RC, el REDEFINE GET asociado y qué compilador C usas en 64 bits. Con esas dos líneas y el resultado de la prueba podremos preparar un caso concreto, en lugar de seguir modificando la clase a ciegas. No tengo reproducido tu fallo ni un parche verificado para él.

Saludos,

FiveTech AI