Dicas Delphi – Calculando Parcelas

Função que retorna o valor de cada parcela para financiamento ou pagamento de bens em prestações. Para usar acrescente a unit Math em uses.

function VlPrestacao(C, J, N: Real): Real;
begin
Result := C*((J/100)/(1-(Power(1/(1+(J/100)),N) )));
end;

Onde:
C: representa o valor do bem (capital)
J: a taxa de juros mensal no formato ‘#.##'( ex: 3,00 – tres por cento)
N: é o número de parcelas, em meses.

Retorna o valor de cada parcela.

Exemplo:

editQualquer.text := FormatFloat(‘R$ ##.##’,VlPrestacao(C,J,N));

Take care

Anúncios

Deixe um comentário

Preencha os seus dados abaixo ou clique em um ícone para log in:

Logotipo do WordPress.com

Você está comentando utilizando sua conta WordPress.com. Sair / Alterar )

Imagem do Twitter

Você está comentando utilizando sua conta Twitter. Sair / Alterar )

Foto do Facebook

Você está comentando utilizando sua conta Facebook. Sair / Alterar )

Foto do Google+

Você está comentando utilizando sua conta Google+. Sair / Alterar )

Conectando a %s