Regresar el numero de semana

[zvf]

Holaa!!!

Una pregunta...

Hay algun componente o funcion que regrese el número de semana en delphi?

Es decir, al momento en que yo le de un dia, me diga a que numero de semana pertenece.

GRACIAS!!

[egostar]

WeekOf Routine Returns the week of the year represented by a TDateTime value.

Unit

DateUtils

Function Weekof(const AValue:TDateTime):Word;

Call WeekOf to obtain the week of the year represented by a specified TDateTime value. WeekOf returns a value between 1 and 53.

Saludos

[zvf]

Gracias Por Tu Atencion Y Tu Ayuda!! :)