rango valido

[[FGarcia]]

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!!

[[seoane]]

En el evento OnKeyPress la variable Key es de tipo Char no integer. Lo que quieres hacer tu con integer se haria asi:

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

Fijate bien, no es lo mismo un nueve que la leta nueve, no es lo mismo 9 que '9'

[[FGarcia]]

Ya!
Disculpen ustedes pero con este calor (36 C) y despues de una exquisita "Corona" bien fria me di cuenta del error : Declare un conjunto de caracteres (Char) ['0'..'9'] cuando debia ser de enteros (integer) [0..9]

SALUD!!!