devxlogo

Computing Number of the Week

Computing Number of the Week

Question:
I want to compute the number of the week.

Thanks in advance

PLM

Answer:
This is pretty basic stuff. If you want the current week of the month, a simple function will do the trick:

function GetWeekOfMonth(Day : Integer) : Integer;begin  if (Day >= 1) AND (Day = 8) AND (Day = 15) AND (Day = 22) AND (Day  29) then    Result := 5;end;

devx-admin

Share the Post: