Hola:
Por lo que se ve en tu ejemplo para tí el primer día de la semana es el lunes, pero debes de tener en cuenta que Delphi es anglosajón y por lo tanto los anglosajones primero descansan y luego trabajan, es decir, que para ellos el primer día de la semana es el domingo y el último (7º) el sábado.
En el ejemplo tuyo creo que con DayOfWeek sabrías que el día 3 no es el día 5 de la semana, sino el 6 que corresponde al viernes.
Si tienes esto en cuenta creo que tu planteamiento puede servir.
De todas formas mira en DateUtils que hay un montón de funciones de fechas por si hubiera alguna que te sirva.
Un saludo. Tomás.
|