Conversão de Valores

Delphi

13/12/2004

Ola tudo bem?

Estou com um problema fácil mas não acho a resposta.

Tenhu em uma classe o campo de Peso, no caso eu defini ele como currency, por seus valores nao serem altos e eu apenas necessitar de 3 casas decimais, em um certo ponto do de alguns calculos eu preciso fazer a divisao inteira do numero, e pra isso utilizo o [b:97f27c0c51]div[/b:97f27c0c51] mas ele dá um erro q nao aceita um dos operandos, pelo help o [b:97f27c0c51]div[/b:97f27c0c51] so funciona com 2 inteiros, e é ai que eu estou com problema, como faço pra usar um cast, como no C ou Java de currency p/ integer ? ou será que existe uma função pra isso ?


Agradeço a ajuda!!!
Abraços
Julio


Tuskinhu

Tuskinhu

Curtidas 0

Respostas

Renato_sp

Renato_sp

13/12/2004

Amigo pelo que entendi vc quer dividir numero de ponto flutuante.. se for o seu caso nao precisa dar um cast como em java por exemplo.
No delphi seria assim


div - Divisao de Inteiro
/ - Divisao de ponto flutuante


Entao no seu caso ai basta trocar o DIV pelo / que resolve

Espero ter ajudado..


GOSTEI 0
Massuda

Massuda

13/12/2004

[...] em um certo ponto do de alguns calculos eu preciso fazer a divisao inteira do numero, e pra isso utilizo o div [...]
Além de dividir usando [b:d81c56e320]/[/b:d81c56e320] ao invés de [b:d81c56e320]div[/b:d81c56e320], como o colega Renato_SP explicou, use [b:d81c56e320]Trunc[/b:d81c56e320] para converter o resultado da divisão de volta para Integer, como você mencionou.
var
  i: Integer;
  c: Currency;
  n: Integer;
begin
  n := Trunc(i / c);



GOSTEI 0
Tuskinhu

Tuskinhu

13/12/2004

Obrigado pela ajuda!!!


GOSTEI 0
POSTAR