Un pequeño consejo, que muestra cómo decirle a windows que el control de Edición sólo debe permitir la entrada numérica.
Si usted necesita un control de Edición de Windows para aceptar sólo los números válidos, pero no quiere usar TSpinEdit, aquí es un simple trozo de código que le permitirá alterar el comportamiento de un estándar de control de Edición de Windows.
procedimiento MakeNumericOnly(Mango: THandle) begin SetWindowLong(Mango, GWL_STYLE, GetWindowLong(Mango, GWL_STYLE) o ES_NUMBER) fin |
Hacer un tedit numerico
Hacer un tedit numerico : Multi-millones de consejos para hacer su vida mas facil.
Un pequeño consejo, que muestra como decirle a windows que el control de Edicion solo debe permitir la entrada numerica.
Si usted necesita un control de Edicion de Windows para aceptar solo los numeros validos, pero no quiere usar TSpinEdit, aqui es un simple trozo de codigo que le permitira alterar el comportamiento de un estandar de control de Edicion de Windows.
procedimiento MakeNumericOnly(Mango: THandle) begin SetWindowLong(Mango, GWL_STYLE, GetWindowLong(Mango, GWL_STYLE) o ES_NUMBER) fin |