Comunidad Gambas-es

Versión completa: ValueCase. Una extensión de ValueBox
Actualmente estas viendo una versión simplificada de nuestro contenido. Ver la versión completa con el formato correcto.
Me pidió uno de vosotros un control ValueBox con los siguientes requerimientos:

1- Propiedad para indicara el valor máximo a soportar
2- propiedad para indicar el  valor mínimo a soportar
3- mostrar estilo milenar, Ejemplo: 25,000.00
4- poder indicar cual es el separador de miles que se va a usar (punto o coma)
5- boton adjunto para limpiar
6- seleccionar todo el contenido al tomar el foco
7- Propiedad para indicar el valor por defecto
8- establecer la cantidad de dígitos decimales a soportar

A pesar de familiares auto-invitados, cortes de internet, digestiones increíbles y comas turroneros, he desarrollado el que abajo os adjunto para vuestro examen y uso y disfrute.
A tener en cuenta:

    1- El requerimiento 4, de poder elegir el punto o la coma, no lo he implementado porque se toma el del idioma establecido. No sería difícil añadir esa opción, pero sería algo que no se usaría nunca y he preferido dejarlo así.

    2-  Muestra un balloon con un mensaje en caso de que el valor tecleado no esté en rango, por lo que si programáis en otros idiomas hay que ir a traducir el proyecto... o cambiar el textro del mensaje, claro.

    3- Como selecciona el valor existente al tomar el foco, es susceptible de errores, por lo que le he establecido la tecla "Esc" como seguridad que retorna el valor original.
   
    4 - El icono que le he hecho es una mierda y si alguien más habilidoso hace uno mejor estaré encantado.

Es la primera vez que desarrollo un control "a pedido" y me ha resultado muy divertido hacerlo. Si alguien quiere algún programita que esté a mi alcance... tengo tiempo, tengo tiempo.

Cualquier feed-back será agradecido eternamente.

Saludos