Erro estranho usando quot;inquot;

Delphi

25/09/2007

Utilizo o ´IN´ para verificar se uma variavel esta no range, porem quando o valores a serem comparados tem mais de 4 algarismos, pelo que percebi, ele retorna erro. Constant expression violates subragen bouds.

if (DMF.CdsSolicitacao2codpro.Value in [50,55,152]) then = funciona
if (DMF.CdsSolicitacao2codpro.Value in [50,55,1592]) then = erro

Abs


Felipeiw

Felipeiw

Curtidas 0

Respostas

Paulo

Paulo

25/09/2007

Não tenho nem idéia do que seja, mas experimente trocar o Value por um ASInteger ou qualquer coisa semelhante. Veja também como está definido o campo, sei lá, se não tem nenhuma restrição ou algo parecido. Pelo tamanho que vc postou(1542), está dentro do range do integer.


GOSTEI 0
Massuda

Massuda

25/09/2007

Utilizo o ´IN´ para verificar se uma variavel esta no range, porem quando o valores a serem comparados tem mais de 4 algarismos, pelo que percebi, ele retorna erro.
O ´in´ suporta valores de 0 a 255. Isso se deve ao modo como ´set´ é implementado pelo compilador, não tem como ser mudado.


GOSTEI 0
POSTAR