Fórum comom faço para quebra um valor ? #172124
29/07/2003
0
Galera Boa Tarde!!!
Tenho uma Variavel (Valor)
o Valor contido nela é (13,10), como eu faço para jogar o 13 ne outra variavel eo 10 ne outra variavel tbm ?
Tenho uma Variavel (Valor)
o Valor contido nela é (13,10), como eu faço para jogar o 13 ne outra variavel eo 10 ne outra variavel tbm ?
C-t
Curtir tópico
+ 0
Responder
Posts
29/07/2003
Alesjrp
decimal=StrtoFloat(Copy(FormatFloat(´00000000.00´,wnumero),10,2);
Centena=StrtoFloat(Copy(FormatFloat(´00000000.00´,wnumero),1,8);
Utiliza a FormatFloat para colocar a quantidade de zeros que deseja em seguida copie parte desejada e transforme em float novamente.
Alexnadre
Centena=StrtoFloat(Copy(FormatFloat(´00000000.00´,wnumero),1,8);
Utiliza a FormatFloat para colocar a quantidade de zeros que deseja em seguida copie parte desejada e transforme em float novamente.
Alexnadre
Responder
Gostei + 0
29/07/2003
C-t
Valeu abraços!!!!!!!!!111
Responder
Gostei + 0
29/07/2003
Vmotta
var
valor,v1,v2: real;
begin
// armazena o valor 13,10 na variável valor
valor := 13.10;
// pega apenas a parte inteira
v1 := trunc(valor);
// tira a parte inteira e multiplica por 100
v2 := (valor - v1) * 100;
end;
Espero ter ajudado !!!
T+
Vitor <vmotta@eep.br>
valor,v1,v2: real;
begin
// armazena o valor 13,10 na variável valor
valor := 13.10;
// pega apenas a parte inteira
v1 := trunc(valor);
// tira a parte inteira e multiplica por 100
v2 := (valor - v1) * 100;
end;
Espero ter ajudado !!!
T+
Vitor <vmotta@eep.br>
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)