En el enlace que te he pasado vienen ejemplos:
En este caso devuelve el número del mes:
Código Delphi
[-]var
myDate : TDateTime;
begin
myDate := EncodeDate(2002, 10, 29);
ShowMessage('The month of the year = '+
IntToStr(MonthOfTheYear(myDate)));
end;
En cuanto al número de semana de un mes, ¿será semana del año, no?