FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
rango de numeros
hola , tengo que introducir numeros en un edit , una vez que sepa que son numeros , esos numeros tiene que estar en un rango de 5000000 y 50000000 millones , cmo lo debo hacer
gracias |
#2
|
|||
|
|||
Val
La funcion Val te permite ver si son numericos
Ej; var code,yy:integer; begin Val(Edit,code,yy); if code=0 then //Es numerico y validas el rango else //No es numerico :-) |
#3
|
|||
|
|||
gracias por responder ... yo tengo este codigo :
procedure TForm1.edit10keypress(Sender: TObject; var Key: Char); begin if (key <#48) or (key >#57) then if key<>#8 then begin beep; showmessage('Solo Puede Ingresar Números'); key:=#0; end; end; ahora necesito establecer un rango de numeros , cmo lo hago no entiendo gracias |
#4
|
||||
|
||||
Por favor, recordad usar las etiquetas para el código:
. |
#5
|
|||
|
|||
no puedo encontra la solucion , agradesco toda respuesta
|
#6
|
|||
|
|||
para ser mas especifico mi rango de nuemros que incerto tiene que estar entre 5000000 millones y 50millones porque es para el documento gracias
|
#7
|
||||
|
||||
quieres ingresar un numero...
ese numero es para multilpicar? o es nu Numero de documento ?
__________________
Dulce Regalo que Satanas manda para mi..... |
#8
|
|||
|
|||
yo ingreso los numeros en el edit , una vez validados que sean numeros ( eso ya lo consegui ) , necesito que tambien esos numeros que yo ingreso esten en un rango de 5000000 millones y 500000000 millones...si estan en ese rango que los tome y si no que slte un eerror para que vuelva a ingresar los datos
gracias |
#9
|
||||
|
||||
Como son números muy grandes, quizás sea más cómodo comprobar que el primer dígito es un 5 o menos de 5 y que la longitud del texto introducido corresponde con la longitud del número que hay que introducir.
|
#10
|
|||
|
|||
si lo pense pero no se como hacerlo, estoy perdido , soy nuevo y me cuesta
gracias |
#11
|
||||
|
||||
¿Y qué sabes hacer?, ¿qué llevas hecho?, ¿no tienes nada de código?, ¿te hacemos el trabajo?
|
#12
|
|||
|
|||
ya realize la validacion para permitir que ingrese numeros , con el siguiente codigo :
procedure TForm1.edit2keypress(Sender: TObject; var Key: Char); begin if (key <#48) or (key >#57) then if key<>#8 then begin beep; showmessage('Solo Puede Ingresar Números'); key:=#0; end; end; ahora me falta validar para que esos numeros que yo ingreso este correctois si estan en un rango entre 10 y 100 por Ej |
#13
|
||||
|
||||
pues puedes usar el ONEXIT
y pregnutar si es numero ingresado es mayor que los 5000000 y menor que los 50000000 o el rango que quieras
__________________
Dulce Regalo que Satanas manda para mi..... |
#14
|
||||
|
||||
Cita:
Pues es lo mismo que cuando empezamos, ¿no has hecho nada nuevo desde entonces? Por cierto, te recomiendo que leas nuestra guía de estilo. Y vuelvo a recordarte que pongas etiquetas al código, ejemplo: . |
#15
|
||||
|
||||
Hola rogercito, como te han indicado puedes utilizar el evento OnExit de tu Edit y hacer la verificación ahí:
Ahora si tu rango es de 10-100 como lo ultimo que has dicho, lo manejas como Integer. Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar. |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
rango de numeros con sentencia 'if' ? | chinopom | Varios | 4 | 16-05-2010 05:48:05 |
TrackBar con rango ?? | NeoNew | Varios | 4 | 13-03-2009 20:03:02 |
Rango de Semanas en un mes | Caro | Varios | 6 | 13-09-2007 01:31:00 |
Rango de fechas | roberasturias | Varios | 2 | 23-05-2005 18:02:35 |
Rango de impresion | JulioGO | Impresión | 2 | 27-08-2004 00:33:07 |
|