Foros Club Delphi - ayuda para elaborar un codigo

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - ayuda para elaborar un codigo (https://www.clubdelphi.com/foros/showthread.php?t=60141)

ayuda para elaborar un codigo

hola todos.

Tengo una aplicacion de prestamos lo que me falta para terminarla es que genere recargos, por lo menos tengo una idea pero no se como aplicarla es la siguiente: un cliente tiene la deuda se le divide en cuotas y la cuota la debe pagar mensual.

analice esto: l fecha limite = fecha de prestamo + 29 dias
si la fecha limite= 5 dias mas que la fecha limite entonces
el recargo = 20%.

Es que no se sumarle dias a la fecha.

gracias..........

Hola josi, puedes utilizar la función IncDay.

Código Delphi [-]var
 fecha_limite : TDateTime;
begin
 fecha_limite := IncDay(fecha_prestamo, 29);

Saluditos

Cita:

Empezado por josi (Mensaje 315481)

asi como hiciste, la fecha es un número fecha1 := fecha2 + 29
la funcion IncDay hace eso...

Código:

function IncDay(const AValue: TDateTime;

  const ANumberOfDays: Integer): TDateTime;

begin

  Result := AValue + ANumberOfDays;

end;