Calcular semana del año

[ecfisa]

Empezado por DavidSG4

Hola y gracias por tu rapidez.

tiene buena pinta pero en años bisiestos por ejemplo.

Saludos y gracias de nuevo

Hola DavidSG4.

Si probás el código, verás que funciona correctamente con años bisiestos:

Código Delphi [-]
 ShowMessage(Format('Semana: %d',[Semana(StrToDate('29/02/2000'))]));

Saludos.

[rrf]

Hola.

Hay una función llamada WeekOfTheYear.

Devuelve un valor entero entre 1 y 53 (nº máximo de semanas en un año).

Personalmente no la he probado nunca, pero posiblemente se ajuste a lo que buscas.

Saludos.

[ecfisa]

Empezado por rrf

Hola.

Hay una función llamada WeekOfTheYear.

Devuelve un valor entero entre 1 y 53 (nº máximo de semanas en un año).

Personalmente no la he probado nunca, pero posiblemente se ajuste a lo que buscas.

Saludos.

Hola rrf.

Tenés toda la razón, me había olvidado de ella... (ya que la he usado tanto como vos )

Pero cosa rara, aplicando la fecha '29/02/2000' la función WeekOfTheYear me devuelve 9, cuando en realidad las semanas transcurridas son 8.

No sé a que se deba...


Saludos.

[rrf]

Lo he estado viendo y ese día está en la 9ª semana completa de ese año.

Supongo que esa es la idea, empieza a contar desde la primera semana completa de ese año, que empezó en sábado 1 y domingo 2 (estos 2 días no cuentan).

El día 3 de enero empieza la primera semana (completa) del año y ahí empieza a contar.

El día 29 creo que es un martes, pero de la 9ª semana (según la cuenta anterior).

Y supongo que, por ello, el resultado es 9; porque ese día está en la 9ª semana.

Se ve que lo que cuenta no son las semanas enteras transcurridas, sino el número de la semana en el que se encuentra ese día.

Saludos.

[ecfisa]

Hola rrf.

Tu interpretación sobre como opera la función parece ser correcta.

Y me entero de algo que no sabia, la definición de Semana:

"Serie de siete días naturales consecutivos,empezando por el lunes y acabando por el domingo,
aunque en algunos países empieza el domingo y termina el sábado."

Creo que es algo sobre lo que José Luis, estaba al tanto

Saludos.