Converção de base

Delphi

12/01/2004

ola pessoal,

Alguem jah precisou converter um numero de real para inteiro?
pois eh eu estou tentando mas nao estou sendo feliz eu gostaria se alguem tem alguma solução de como converter um numero real para inteiro????

desde ja agradeço pela ajuda mesmo que soh tenha lido esta questão ....

velu abraços....


Zumbi

Zumbi

Curtidas 0

Respostas

Denis

Denis

12/01/2004

Sempre que preciso fazer isso eu uso a função Trunc . Mas todos os numeros depois da virgula são despresados.

Ex :

Trunc(1274.99) // Resulta 1274

ou

Var x:Integer;
Begin
x := trunc(56456.908) // x será igual a 56456
....


GOSTEI 0
Zumbi

Zumbi

12/01/2004

ola denis,

valeu pela ajuda mas eu tenho q ocupar as casas decimais do numero tambem... entaum eu tenho que ocupar todo o numero....


GOSTEI 0
Aroldo Zanela

Aroldo Zanela

12/01/2004

Colega,

Você pode fazer algo como:

 nInteiro := Trunc( 123.456 * 1000); // 123456
ou
 nInteiro := Trunc( 123.4567 * 10000) // 1234567
ou
 nInteiro := Trunc( 123.45 * 100) // 12345



GOSTEI 0
POSTAR