Resultado de porcentagem
Alô amigos!
Seguinte, estou precisando de uma ajudinha para o seguinte problema:
Preciso tirar o resultado de desconto com porcentagem. Uma parte consegui resolver
mas preciso que o restante da operaçao apareça também.
Para entender melhor:
Valor= 100 desconto 15% = 85 (isso consegui)
valor2 = 15 que é o que restou dos 100. (é aqui que preciso de uma ajudinha)
na forma que fiz coloquei um edit para o valor um edit para entrar com a porcentagem
e no onexit deste edit a operaçao. para jogar o resultado para uma label
gostaria de uma maneira para que ao jogar o resultado para esta label
jogosse tambem para outra label o que restou da operação.
Seguinte, estou precisando de uma ajudinha para o seguinte problema:
Preciso tirar o resultado de desconto com porcentagem. Uma parte consegui resolver
mas preciso que o restante da operaçao apareça também.
Para entender melhor:
Valor= 100 desconto 15% = 85 (isso consegui)
valor2 = 15 que é o que restou dos 100. (é aqui que preciso de uma ajudinha)
na forma que fiz coloquei um edit para o valor um edit para entrar com a porcentagem
e no onexit deste edit a operaçao. para jogar o resultado para uma label
gostaria de uma maneira para que ao jogar o resultado para esta label
jogosse tambem para outra label o que restou da operação.
Renato Sanches
Curtidas 0
Respostas
Natanael Ferreira
24/03/2016
Teste assim:
var ValorTotal, ValorTotalDesconto, Desconto: Double; Percentual: Integer; begin ValorTotal := StrToFloatDef(EditValor.Text, 0); Percentual := StrToIntDef(EditPercentual.Text, 0); Desconto := ValorTotal * Percentual / 100; ValorTotalDesconto := ValorTotal - Desconto; LabelDesconto.Caption := FormatFloat('0.00', Desconto); LabelValorDesconto.Caption := FormatFloat('0.00', ValorTotalDesconto); end;
GOSTEI 0
Renato Sanches
24/03/2016
Vou testar aqui. E volto dizendo se deu certo
GOSTEI 0
Renato Sanches
24/03/2016
Testei hoje, por causa do feriado.
Funcionou beleza era exatamente assim que precisava. Valeu!
Funcionou beleza era exatamente assim que precisava. Valeu!
GOSTEI 0