AJUDEM UM AMIGO INICIANTE-SEI QUE É FACIL
TENHO UM PROGRAMA PRA LANHAUSE JA FUNCIONANDO, MAS FAÇO O CALCULO TEMPO/VALOR ´MANUELMENTE´ (TENHO UMA ESPECIE DE TABELA DE PREÇOS DENTRO DO CÓDIGO), SEI QUE POSSO USAR O DECODETIME, MAS ME AMARREI PARA ARREDONDAR OS VALORES E COLOCAR NUM LABEL POR EXEMPLO, POR FAVOR AJUDEM-ME. DESDE JA AGRADEÇO....
Anonymous
Curtidas 0
Respostas
Anonymous
06/03/2003
Cara, explica melhor sua dúvida, não deu pra entender o que vc quer!
GOSTEI 0
Alphablend
06/03/2003
é verdade, naum deu pra entender nada . . .
GOSTEI 0
Anonymous
06/03/2003
DESCUPEM... É SIMPLES COMO DEVO ARREDONDAR VALORES FRACIONADOS COMO POR EXEMPLO 1,02541254 OU 0,0333334.
OBRIGADO PELA ATENÇÃO
OBRIGADO PELA ATENÇÃO
GOSTEI 0
Anonymous
06/03/2003
e so usar o trunc
exemplo:
var
S, T: string;
begin
Str(1.4:2:1, T);
S := T + ´ Truncs to ´ + IntToStr(Trunc(1.4)) + #1310;
Str(1.5:2:1, T);
S := S + T + ´ Truncs to ´ + IntToStr(Trunc(1.5)) + 1310;
Str(-1.4:2:1, T);
S := S + T + ´ Truncs to ´ + IntToStr(Trunc(-1.4)) + 1310;
Str(-1.5:2:1, T);
S := S + T + ´ Truncs to ´ + IntToStr(Trunc(-1.5));
MessageDlg(S, mtInformation, [mbOk], 0);
exemplo:
var
S, T: string;
begin
Str(1.4:2:1, T);
S := T + ´ Truncs to ´ + IntToStr(Trunc(1.4)) + #1310;
Str(1.5:2:1, T);
S := S + T + ´ Truncs to ´ + IntToStr(Trunc(1.5)) + 1310;
Str(-1.4:2:1, T);
S := S + T + ´ Truncs to ´ + IntToStr(Trunc(-1.4)) + 1310;
Str(-1.5:2:1, T);
S := S + T + ´ Truncs to ´ + IntToStr(Trunc(-1.5));
MessageDlg(S, mtInformation, [mbOk], 0);
GOSTEI 0
Anonymous
06/03/2003
MUITO ABRIGADO VAGNER PELA DICA- VAI ME AJUDAR BASTANTE...VALEU MESMO CARA :D
GOSTEI 0
Dor_poa
06/03/2003
use o formatFloat(´0.00´, valor)
GOSTEI 0