Tema: rango valido
Ver Mensaje Individual
  #1  
Antiguo 28-04-2006
[FGarcia] FGarcia is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Cordoba, Veracruz, México
Posts: 1.123
Reputación: 20
FGarcia Va por buen camino
rango valido

Hola todos!

La pregunta: por que me surge este error?

" Incompatible Types 'Integer' and 'Char' "

En donde:
Si uso un Edit y en su evento OnKeyPress esto es valido:

Código Delphi [-]
If Not Key in ['0'..'9', #8] then
 begin
   //Lo que quieras hacer con tu codigo
  //..
 end;

Ahora bien yo trato de verificar en un procedure que recibe una variable (integer) si esta en el rango de 0 a 9

Código Delphi [-]
If Not intVar in ['0'..'9'] then
 begin
   //Lo que quieras hacer con tu codigo
  //..
 end;

y ahi salta el error, lo mas seguro es que sea una tontera pero "tengo la neuronas libres de alcohol" y asi no funciono!

gracias por la ayuda!!
Responder Con Cita