Fórum Arredondar valores #209980
27/01/2004
0
Como arredondar valores para mais? Ex: 8,45 para 9,00 e assim
sucessivamente?
sucessivamente?
Paulo
Curtir tópico
+ 0
Responder
Posts
27/01/2004
Christian_adriano
Olá Paulo !!!!
É o seguinte para vc arrendondar números vc pode usar a função ´FormatFloat´.
Vou lhe dá uma Exemplo:
Var
N:Real;
begin
N:=StrToFloat(Edit.text);
Edit.Text := FormatFloat(´0.0´,N);
end;
Explicação
Vc cria uma variavel para ospedar o valor q será formatdo.
Depois vc format o valor ospedado na variavel.
´0.0´ -> tipo da formatacao. Ex. 5,5
´0.00´ -> tipo da formatacao. Ex. 5,55
´0.000´ -> tipo da formatacao. Ex. 5,555
Blz???
Qualquer Duvida estou ai.
Falou.
É o seguinte para vc arrendondar números vc pode usar a função ´FormatFloat´.
Vou lhe dá uma Exemplo:
Var
N:Real;
begin
N:=StrToFloat(Edit.text);
Edit.Text := FormatFloat(´0.0´,N);
end;
Explicação
Vc cria uma variavel para ospedar o valor q será formatdo.
Depois vc format o valor ospedado na variavel.
´0.0´ -> tipo da formatacao. Ex. 5,5
´0.00´ -> tipo da formatacao. Ex. 5,55
´0.000´ -> tipo da formatacao. Ex. 5,555
Blz???
Qualquer Duvida estou ai.
Falou.
Responder
Gostei + 0
27/01/2004
Aroldo Zanela
Colega,
Acompanhe esta thread e olhe mais detalhes no Help das funções RoundTo e SimpleRaundTo.
http://delphiforum.icft.com.br/forum/viewtopic.php?t=33544&highlight=roundto
Acompanhe esta thread e olhe mais detalhes no Help das funções RoundTo e SimpleRaundTo.
http://delphiforum.icft.com.br/forum/viewtopic.php?t=33544&highlight=roundto
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)