Valores iguais ... mas difentes!!!
19/12/2003
0
Eu tenho dois valores que aparentemente são iguais. Quando estou debugando eles são iguais 31,9 e 31,9. Faço um if:
if valor 1 <> valor 2 then
entra no if
O problema é que as vezes ele entra mesmo(aparentemente) sendo iguias. Acho que o problema pode estar na precisão desses valores.
utilizo banco de dados oracle e delphi 4.
obrigado!
Cicerojr
Posts
19/12/2003
Nildo
Ps.: Eles não podem ser ponteiros. Caso contrário você estará comparando a memória deles. É o caso do PChar. Tente comparar dois PChars exatamente iguais!
19/12/2003
Beppe
Ex: CompareValue(Valor1, Valor2, 0.1);
Outra alternativa seria comparar a representação em string dos valores.
22/12/2003
Cicerojr
Realmente como foi abordado, o problema era a precisão, e consegui resolver pegando os valores da Query como AsCurrency, pois o AsValue não estava com a precisão correta.
Obrigado e Feliz Natal !!
Clique aqui para fazer login e interagir na Comunidade :)