Converção de base
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....
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
Curtidas 0
Respostas
Renatosilva
12/01/2004
O código abaixo arredonda um real para o inteiro mais próximo (ex: 1,238 vira 1 e 1,5 vira 2):
VarInteira := IntToStr(Round(VarReal));
Safo?
VarInteira := IntToStr(Round(VarReal));
Safo?
GOSTEI 0
Renatosilva
12/01/2004
Foi mal, viajei!
var
VarInteira: Integer;
VarReal: Real;
begin
VarReal := 1.3;
VarInteira := Round(VarReal);
end;
var
VarInteira: Integer;
VarReal: Real;
begin
VarReal := 1.3;
VarInteira := Round(VarReal);
end;
GOSTEI 0