Fórum Trabalhando com datas #256825
01/11/2004
0
Boa tarde pessoal,
Como posso calcular a mora diária, o sistema possui dois DbEdits e no banco o campo correpondente esta como DATE.
Então tenho a data de vencimento e a data de pagamento. Não estou conseguindo calcular a quantidade de dias de atraso para poder aplicar os juros.
No aguardo de um help
Wagner
Como posso calcular a mora diária, o sistema possui dois DbEdits e no banco o campo correpondente esta como DATE.
Então tenho a data de vencimento e a data de pagamento. Não estou conseguindo calcular a quantidade de dias de atraso para poder aplicar os juros.
No aguardo de um help
Wagner
Wagnermarrane
Curtir tópico
+ 0
Responder
Posts
01/11/2004
Rodolpho123
Tente isto:
procedure Tfrm1.Button1Click(Sender: TObject); var dataini,datafim,dias: TDate; begin dataini := StrToDate(´29/10/2004´); datafim := StrToDate(´01/11/2004´); dias := datafim - dataini; ShowMessage(FormatDateTime(´dd´,dias)); end;
Responder
Gostei + 0
02/11/2004
Gurc
Você também pode usar a função DaysBetween da unit DateUtils. Ela faz esse trabalho pra você.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)