Saber si es un numero
Como hace uno para saber si lo que estoy leyendo de un dbstringgrid es un numero o una letra?
Gracias |
La verdad es que no conozco el TDBStringGrid, pero Con un TEdit se puede hacer asi:
Si adecuas este ejemplo a lo que necesitas seguramente te sera útil. ;) |
No tengo delphi a mano ahorita pero tambien esta la funcion IsNumeric que devuelve true si es un numero
|
No se si me equivoco, pero tengo entendido que IsNumeric solo recibe como parámetro un Char, de manera que solo servirá para comprobar los números del 0 al 9.
|
Por eso decia que no tenia delphi a mano de hecho lo escribi de memoria, es mas despues que postee me puse a pensar si no sera de otro lenguaje :confused:
|
Pero siempre podremos hacer nuestra función personalizada :D.
Para usarla es:
Nota: IsNumeric pertenece a la unidad IdGlobal.Pas |
Un pequeño ajuste a esa función ya que si le envían '' me diría que es Numérico y si envían un numero negativo diría que es alfanumerico:
Seguro que esa función debe tener errores aun, pues no tiene en cuenta los flotantes o si le envian algo como -1222-566 tambien presentaria problemas, pero alli se las dejo por si alguien quiere refinarla. |
Buena esa jhonny :)
yo añadiria
|
No la he probado pero esto deberia funcionar
|
:D, Bueno, pero entonces el problema ahora sería porque el siguiente tampoco es un numero y dicha función dirá que si:
9999- Este tipo de cosas son realmente curiosas :D. |
Ahora el siguiente tendría problema también:
999-999 Caracoles, cada vez le encuentro mas problemas, creo que tendré que ponerme a buscar soluciones :). |
Cita:
Ahora solo falta saber si le sirvio la respuesta a nomad para pasarle la factura jejeje |
Jejeje, no he probado tu solución aun pero me imagino que con el siguiente dirá que es numero
9999. //Nunca he visto un numero con ese punto al final :D |
Que tal asi?, la probé y funciono, con las condiciones que hemos nombrado hasta aquí:
|
Cita:
|
Aja mas problemas a ver a ver
|
Cita:
"999 " (Con espacio al final, por ejemplo). Esa función dirá que es alfanumérico. Pero la siguiente no.
|
Ok jhonny hoy tengo el cerebro en off por mas qe trato le busco problemas y no se me ocurre ni uno jejeje
creo que me gusta mas pensar en soluciones que en problemas |
Cita:
|
Con un Autómata Así se llamaría, si no me equivoco...... funciona en todos los casos. |
La franja horaria es GMT +2. Ahora son las 02:38:52. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi