GARANTIR DESCONTO

Fórum Informação sobre problemas com o trunc #182710

18/09/2003

0

O problema ocorrido abaixo foi testado no delphi3.02 e no delphi5. Favor testarem em outras versões.

Em uma de minhas aplicações faço o seguinte:

begin
  showMessage(format(´¬.7d´,[Trunc(9.90 * 100)]));
end;


O resultado deveria ser ´0000990´ mas retorna ´0000989´

Então resolvi da seguinte maneira:

begin
    showMessage(format(´¬.7d´,[StrToInt(format(´¬7.0f´,[9.90 * 100]))]));
end;


Esta mensagem é apenas um aviso.

Obs: O valor 9.90 na verdade não é fixo. :idea:


Adilsond

Adilsond

Responder

Posts

18/09/2003

Lidiane

AdilsonD,
tente assim:

var valor : variant;
begin
  valor:=9.90*100;
  showMessage(format(´¬.7d´,[(Trunc(valor))]));
end;




Lidiane.


Responder

Gostei + 0

18/09/2003

Adilsond

Lidiane,

Realmente, se calcular o valor antes de passar para o trunc funciona perfeitamente.


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar