607 lines
17 KiB
C
607 lines
17 KiB
C
|
/*
|
||
|
|
* Windows Calendar
|
||
|
|
* Copyright (c) 1985 by Microsoft Corporation, all rights reserved.
|
||
|
|
* Written by Mark L. Chamberlin, consultant to Microsoft.
|
||
|
|
*
|
||
|
|
****** calmonth.c
|
||
|
|
*
|
||
|
|
*/
|
||
|
|
|
||
|
|
#include "cal.h"
|
||
|
|
|
||
|
|
|
||
|
|
/**** GetWeekday - calculate day of week from D3. */
|
||
|
|
|
||
|
|
WORD APIENTRY GetWeekday (D3*pd3)
|
||
|
|
{
|
||
|
|
/* Add 2 since January 1, 1980 was a Tuesday. */
|
||
|
|
return ((DtFromPd3 (pd3) + 2) % 7);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** CDaysMonth - return the number of days in the month specified
|
||
|
|
by the month and year of the D3 argument.
|
||
|
|
****/
|
||
|
|
|
||
|
|
INT APIENTRY CDaysMonth (D3*pd3)
|
||
|
|
{
|
||
|
|
register INT cDays;
|
||
|
|
|
||
|
|
/* Calculate the number of days in the current month (adding in
|
||
|
|
one if this is a leap year and the month is past February.
|
||
|
|
*/
|
||
|
|
cDays = vrgcDaysMonth [pd3 -> wMonth];
|
||
|
|
if (pd3 -> wYear % 4 == 0 && pd3 -> wMonth == MONTHFEB)
|
||
|
|
cDays++;
|
||
|
|
|
||
|
|
return (cDays);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** SetUpMonth - Based on vd3Sel, set up the following:
|
||
|
|
- vcDaysMonth - number of days in the month being displayed.
|
||
|
|
- vcWeeksMonth - the number of weeks needed to display the month
|
||
|
|
(4, 5, or 6).
|
||
|
|
- vrgbMonth - the array of days. 0's indicate unused entries.
|
||
|
|
|
||
|
|
****/
|
||
|
|
|
||
|
|
VOID APIENTRY SetUpMonth ()
|
||
|
|
{
|
||
|
|
WORD wDay;
|
||
|
|
INT *pb; /* changed from BYTE to int */
|
||
|
|
D3 d3Temp;
|
||
|
|
INT i;
|
||
|
|
|
||
|
|
for (i=0; i< CBMONTHARRAY;i++)
|
||
|
|
vrgbMonth[i]=0;
|
||
|
|
|
||
|
|
/* FillBuf (vrgbMonth, CBMONTHARRAY*sizeof(int), 0); */
|
||
|
|
|
||
|
|
/* Set up the count of days in the month. */
|
||
|
|
vcDaysMonth = CDaysMonth (&vd3Sel);
|
||
|
|
|
||
|
|
/* Get the weekday of the the first day of the month. */
|
||
|
|
d3Temp = vd3Sel;
|
||
|
|
d3Temp.wDay = 0;
|
||
|
|
vwWeekdayFirst = GetWeekday (&d3Temp);
|
||
|
|
|
||
|
|
/* Calculate the number of weeks we will need to display. */
|
||
|
|
vcWeeksMonth = (vwWeekdayFirst + 6 + vcDaysMonth) / 7;
|
||
|
|
|
||
|
|
/* Fill in the days. */
|
||
|
|
pb = vrgbMonth + vwWeekdayFirst;
|
||
|
|
|
||
|
|
for (wDay = 1; (WORD)wDay <= (WORD)vcDaysMonth; wDay++)
|
||
|
|
/* *pb++ = (BYTE)wDay; */
|
||
|
|
*pb++ = wDay;
|
||
|
|
|
||
|
|
/* Set the TODAY bit of the appropriate day if today
|
||
|
|
is in this month.
|
||
|
|
*/
|
||
|
|
if (vd3Cur.wMonth == vd3Sel.wMonth && vd3Cur.wYear == vd3Sel.wYear)
|
||
|
|
vrgbMonth [vwWeekdayFirst + vd3Cur.wDay] |= TODAY;
|
||
|
|
|
||
|
|
/* Set the marked bits for the marked days in this month. */
|
||
|
|
GetMarkedDays ();
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** BuildMonthGrid */
|
||
|
|
|
||
|
|
VOID APIENTRY BuildMonthGrid ()
|
||
|
|
{
|
||
|
|
INT dx;
|
||
|
|
INT dy;
|
||
|
|
INT xco;
|
||
|
|
INT yco;
|
||
|
|
INT cLines;
|
||
|
|
|
||
|
|
/* Calculate the x coordinates if vertical scrollbar is absent */
|
||
|
|
if (vmScrollMax == 0)
|
||
|
|
{
|
||
|
|
dx = (vcxWnd2B + vcxBorder + vcxVScrollBar)/ 7;
|
||
|
|
vrgxcoGrid [7] = vcxWnd2B + vcxHScrollBar;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
/* Calculate the x coordinates if vertical scrollbar is present */
|
||
|
|
dx = (vcxWnd2B + vcxBorder) / 7;
|
||
|
|
vrgxcoGrid [7] = vcxWnd2B ;
|
||
|
|
}
|
||
|
|
|
||
|
|
xco = - vcxBorder;
|
||
|
|
|
||
|
|
for (cLines = 0; cLines < 7; cLines++)
|
||
|
|
{
|
||
|
|
vrgxcoGrid [cLines] = xco;
|
||
|
|
xco += dx;
|
||
|
|
}
|
||
|
|
|
||
|
|
/* Calculate the y coordinates if horiz. scrollbar is absent. */
|
||
|
|
if (hmScrollMax == 0)
|
||
|
|
{
|
||
|
|
dy = (vcyWnd2BBot - vcyBorder + vcyHScrollBar)/vcWeeksMonth;
|
||
|
|
vrgycoGrid [vcWeeksMonth] = vcyWnd2B;
|
||
|
|
}
|
||
|
|
/* Calculate the y coordinates if horiz. scrollbar is present. */
|
||
|
|
else
|
||
|
|
{
|
||
|
|
dy = (vcyWnd2BBot - vcyBorder) / vcWeeksMonth;
|
||
|
|
vrgycoGrid [vcWeeksMonth] = vcyWnd2B - vcyHScrollBar;
|
||
|
|
}
|
||
|
|
|
||
|
|
yco = vcyWnd2BTop;
|
||
|
|
|
||
|
|
for (cLines = 0; cLines < vcWeeksMonth; cLines++)
|
||
|
|
{
|
||
|
|
vrgycoGrid [cLines] = yco;
|
||
|
|
yco += dy;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** PaintMonthGrid - Paint the grid for the monthly calendar display. */
|
||
|
|
|
||
|
|
VOID APIENTRY PaintMonthGrid (HDC hDC)
|
||
|
|
{
|
||
|
|
INT *pcoCur;
|
||
|
|
INT *pcoMax;
|
||
|
|
|
||
|
|
BuildMonthGrid ();
|
||
|
|
|
||
|
|
/* Draw the horizontal lines. */
|
||
|
|
|
||
|
|
pcoCur = vrgycoGrid;
|
||
|
|
for (pcoMax = pcoCur+vcWeeksMonth; pcoCur < pcoMax; pcoCur++)
|
||
|
|
PatBlt (hDC, 0, *pcoCur, vcxWnd2B + vcxVScrollBar, vcyBorder, PATCOPY);
|
||
|
|
|
||
|
|
/* Draw the vertical lines. */
|
||
|
|
pcoCur = vrgxcoGrid + 1;
|
||
|
|
for (pcoMax = pcoCur+6; pcoCur < pcoMax; pcoCur++)
|
||
|
|
PatBlt(hDC, *pcoCur, vcyWnd2BTop, vcxBorder, vcyWnd2BBot + vcyHScrollBar, PATCOPY);
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** PaintMonth */
|
||
|
|
|
||
|
|
VOID APIENTRY PaintMonth (HDC hDC)
|
||
|
|
{
|
||
|
|
INT xcoBox;
|
||
|
|
INT ycoBox;
|
||
|
|
INT dx;
|
||
|
|
INT dy;
|
||
|
|
INT xcoText;
|
||
|
|
INT ycoText;
|
||
|
|
INT cDay;
|
||
|
|
INT cWeek;
|
||
|
|
INT cch;
|
||
|
|
CHAR *pch;
|
||
|
|
INT *pb; /* changed from BYTE to int */
|
||
|
|
INT *pxcoCur;
|
||
|
|
INT *pycoCur;
|
||
|
|
CHAR rgchDayAbbrevs[4];
|
||
|
|
CHAR rgch[CCHDATEDISP];
|
||
|
|
DOSDATE dd;
|
||
|
|
extern HANDLE hinstTimeDate;
|
||
|
|
INT iWeekStart; /* week no. of month which will appear on top row
|
||
|
|
in monthview */
|
||
|
|
INT iWeekEnd; /* week no. which will appear on last row of
|
||
|
|
month view */
|
||
|
|
INT iDayStart; /* weekday which will appear on leftmost column */
|
||
|
|
INT iDayEnd; /* weekday which will appear on rightmost column */
|
||
|
|
INT MarkedBits; /* the marked bits extracted from a day */
|
||
|
|
|
||
|
|
dd.year = vd3Sel.wYear + 1980;
|
||
|
|
dd.month = vd3Sel.wMonth + 1;
|
||
|
|
|
||
|
|
cch = GetLongDateString(&dd, rgch, GDS_LONG | GDS_NODAY);
|
||
|
|
|
||
|
|
xcoText = (vcxWnd2B - cch * vcxFont) / 2;
|
||
|
|
ycoText = 2;
|
||
|
|
|
||
|
|
TextOut(hDC, xcoText, ycoText, (LPSTR)rgch, cch );
|
||
|
|
|
||
|
|
iDayEnd = 7;
|
||
|
|
iWeekEnd = vcWeeksMonth + 2;
|
||
|
|
|
||
|
|
/* for an unscrolled window */
|
||
|
|
if ((vmScrollPos == 0) && (hmScrollPos == 0))
|
||
|
|
{
|
||
|
|
iWeekStart = 0;
|
||
|
|
iDayStart = 0;
|
||
|
|
pb = vrgbMonth;
|
||
|
|
pycoCur = vrgycoGrid;
|
||
|
|
}
|
||
|
|
else /* scrolled window */
|
||
|
|
{
|
||
|
|
iWeekStart = vmScrollPos +1;
|
||
|
|
iDayStart = hmScrollPos;
|
||
|
|
pycoCur = vrgycoGrid + iWeekStart -(vmScrollPos + 1);
|
||
|
|
pb = vrgbMonth + (iWeekStart -1)*7 + iDayStart;
|
||
|
|
}
|
||
|
|
|
||
|
|
ycoBox = *pycoCur;
|
||
|
|
dy = *pycoCur -ycoBox;
|
||
|
|
pxcoCur = vrgxcoGrid;
|
||
|
|
pb -= iDayStart - hmScrollPos ;
|
||
|
|
|
||
|
|
/* display "S M T W ..." above month grid */
|
||
|
|
for (cDay = iDayStart; cDay < iDayEnd; cDay++ )
|
||
|
|
{
|
||
|
|
INT cchT;
|
||
|
|
xcoBox = *pxcoCur++;
|
||
|
|
dx = *pxcoCur -xcoBox;
|
||
|
|
cchT = LoadString(hinstTimeDate, IDS_DAYABBREVS+cDay,
|
||
|
|
(LPSTR)rgchDayAbbrevs, 4);
|
||
|
|
|
||
|
|
xcoText = xcoBox + (dx - cchT*vcxFont)/2;
|
||
|
|
ycoText = vcyWnd2BTop -vcyLineToLine;
|
||
|
|
TextOut (hDC, xcoText, ycoText, (LPSTR)rgchDayAbbrevs, cchT);
|
||
|
|
}
|
||
|
|
|
||
|
|
/* draw the month grid and fill in the dates */
|
||
|
|
for (cWeek = iWeekStart ; cWeek < iWeekEnd ; cWeek++,pb+=iDayStart)
|
||
|
|
{
|
||
|
|
ycoBox = *pycoCur++;
|
||
|
|
dy = *pycoCur - ycoBox;
|
||
|
|
pxcoCur = vrgxcoGrid;
|
||
|
|
|
||
|
|
for (cDay = iDayStart; cDay < iDayEnd ; cDay++, pb++)
|
||
|
|
{
|
||
|
|
xcoBox = *pxcoCur++;
|
||
|
|
dx = *pxcoCur - xcoBox;
|
||
|
|
|
||
|
|
if (*pb !=0)
|
||
|
|
{
|
||
|
|
cch = 2;
|
||
|
|
ByteTo2Digs (*pb & ~(MARK_BOX| TODAY), pch = rgch);
|
||
|
|
|
||
|
|
if (*pch == '0')
|
||
|
|
{
|
||
|
|
cch--;
|
||
|
|
pch++;
|
||
|
|
}
|
||
|
|
xcoText = xcoBox + (dx - cch * vcxFont) / 2;
|
||
|
|
ycoText = ycoBox + vcyBorder + (dy - vcyFont) / 2;
|
||
|
|
|
||
|
|
/* draw mark symbols, if any */
|
||
|
|
if ((MarkedBits = ((~CLEARMARKEDBITS) & (*pb))) != 0)
|
||
|
|
DrawMark (hDC, xcoBox, ycoText, dx, MarkedBits);
|
||
|
|
|
||
|
|
if (*pb & TODAY)
|
||
|
|
ShowToday (hDC, xcoBox, ycoText, dx);
|
||
|
|
|
||
|
|
TextOut (hDC, xcoText, ycoText, (LPSTR)pch, cch);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
InvertDay (hDC, vd3Sel.wDay);
|
||
|
|
/* Don't mess with the caret position if the notes have the focus. */
|
||
|
|
if (vhwndFocus == vhwnd2B)
|
||
|
|
PositionCaret ();
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** DrawMark ***/
|
||
|
|
/***********************************************************************
|
||
|
|
*
|
||
|
|
* VOID PASCAL DrawMark (hDC, xcoBox, ycoText, dx, MarkedBits)
|
||
|
|
*
|
||
|
|
* purpose : To extract the marked bits one by one and draw the corresp.
|
||
|
|
* mark symbols next to the selected day in month mode.
|
||
|
|
*
|
||
|
|
* paramteters : hDC - the display context
|
||
|
|
* xcoBox - the x-coordinate of the left vertical edge
|
||
|
|
* of box containing selected day
|
||
|
|
* ycoText - y-coordinate of text to be written in box
|
||
|
|
* dx - width of box
|
||
|
|
* MarkedBits - variable with bits set corresp. to marks on
|
||
|
|
* selected day
|
||
|
|
*
|
||
|
|
* returns : none
|
||
|
|
*
|
||
|
|
* called by : PaintMonth
|
||
|
|
*
|
||
|
|
***********************************************************************/
|
||
|
|
|
||
|
|
|
||
|
|
VOID APIENTRY DrawMark (
|
||
|
|
HDC hDC,
|
||
|
|
INT xcoBox,
|
||
|
|
INT ycoText,
|
||
|
|
INT dx,
|
||
|
|
INT MarkedBits)
|
||
|
|
{
|
||
|
|
INT xcoLeft; /* left x coordinate of box mark */
|
||
|
|
INT xcoRight; /* right x coordinate of box mark */
|
||
|
|
INT ycoTop; /* top y coordinate of box mark */
|
||
|
|
INT ycoBottom; /* bottom y coordinate of box mark */
|
||
|
|
|
||
|
|
/* Note - the assumption is that numeric digits will not have
|
||
|
|
descenders. Therefore, we subtract out the descent when
|
||
|
|
calculating the space below the date digits in the monthly
|
||
|
|
calendar display.
|
||
|
|
*/
|
||
|
|
xcoLeft = xcoBox + (dx - 2 * vcxFont) / 2 - 2 * vcxBorder;
|
||
|
|
xcoRight = xcoLeft + 2 * vcxFont + 6 * vcxBorder;
|
||
|
|
ycoTop = ycoText - 2 * vcyBorder;
|
||
|
|
ycoBottom = ycoText + vcyFont + max (vcyBorder - vcyDescent, 0);
|
||
|
|
|
||
|
|
if (MarkedBits & MARK_BOX) /* a box-type mark */
|
||
|
|
{
|
||
|
|
PatBlt (hDC, xcoLeft, ycoTop, xcoRight - xcoLeft + 1, vcyBorder, PATCOPY);
|
||
|
|
PatBlt (hDC, xcoLeft, ycoBottom, xcoRight - xcoLeft + 1, vcyBorder, PATCOPY);
|
||
|
|
|
||
|
|
PatBlt (hDC, xcoLeft, ycoTop, vcxBorder, ycoBottom - ycoTop + 1, PATCOPY);
|
||
|
|
PatBlt (hDC, xcoRight, ycoTop, vcxBorder, ycoBottom - ycoTop + 1, PATCOPY);
|
||
|
|
}
|
||
|
|
|
||
|
|
if (MarkedBits & MARK_CIRCLE) /* a "o" -type mark */
|
||
|
|
Ellipse (hDC, xcoLeft - 7*vcxBorder, ycoBottom +2*vcyBorder,
|
||
|
|
xcoLeft - 3*vcxBorder, ycoBottom + 6*vcyBorder);
|
||
|
|
|
||
|
|
if (MarkedBits & MARK_PARENTHESES) /* a parentheses-type mark */
|
||
|
|
{
|
||
|
|
TextOut ( hDC, xcoLeft - 4*vcxFont/3,ycoText, vszMarkLeftParen, 1);
|
||
|
|
TextOut ( hDC, xcoRight + 2*vcxBorder,ycoText, vszMarkRightParen,1);
|
||
|
|
}
|
||
|
|
|
||
|
|
if (MarkedBits & MARK_CROSS) /* an "x" mark */
|
||
|
|
{
|
||
|
|
(void)MMoveTo (hDC, xcoLeft - 2*vcxBorder, ycoTop - 2*vcxBorder);
|
||
|
|
LineTo (hDC, xcoLeft - 7*vcxBorder, ycoTop -6*vcxBorder);
|
||
|
|
(void)MMoveTo (hDC, xcoLeft - 6*vcxBorder, ycoTop - 2*vcxBorder);
|
||
|
|
LineTo (hDC, xcoLeft - vcxBorder, ycoTop -6*vcxBorder);
|
||
|
|
}
|
||
|
|
|
||
|
|
if (MarkedBits & MARK_UNDERSCORE) /* a "_" mark */
|
||
|
|
{
|
||
|
|
/*
|
||
|
|
ycoBottom = ycoText + 14 * vcyBorder;
|
||
|
|
*/
|
||
|
|
PatBlt (hDC, xcoLeft, ycoBottom, xcoRight - xcoLeft + 1, vcyBorder, PATCOPY);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
/**** ShowToday */
|
||
|
|
|
||
|
|
VOID APIENTRY ShowToday (
|
||
|
|
HDC hDC,
|
||
|
|
INT xcoBox,
|
||
|
|
INT ycoText,
|
||
|
|
INT dx)
|
||
|
|
{
|
||
|
|
TextOut (hDC, xcoBox + 1, ycoText, (LPSTR)">", 1);
|
||
|
|
TextOut (hDC, xcoBox + dx - vcxFont - 2, ycoText, (LPSTR)"<", 1);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** InvertDay - Invert the specified day. */
|
||
|
|
|
||
|
|
VOID APIENTRY InvertDay (
|
||
|
|
HDC hDC,
|
||
|
|
WORD wDay)
|
||
|
|
{
|
||
|
|
RECT rect;
|
||
|
|
|
||
|
|
MapDayToRect (wDay, &rect);
|
||
|
|
InvertRect (hDC, (LPRECT)&rect);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** PositionCaret */
|
||
|
|
|
||
|
|
VOID APIENTRY PositionCaret ()
|
||
|
|
{
|
||
|
|
RECT rect;
|
||
|
|
INT xcoCaret;
|
||
|
|
INT ycoCaret;
|
||
|
|
|
||
|
|
MapDayToRect (vd3Sel.wDay, &rect);
|
||
|
|
|
||
|
|
/* Center the caret horizontally (it is 2 * vcxFont wide),
|
||
|
|
and put it just above the bottom of the date box.
|
||
|
|
*/
|
||
|
|
xcoCaret = (rect.left + rect.right) / 2 - vcxFont;
|
||
|
|
ycoCaret = rect.bottom - vcyBorder;
|
||
|
|
SetCaretPos (xcoCaret, ycoCaret);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** MapDayToRect */
|
||
|
|
|
||
|
|
VOID APIENTRY MapDayToRect (
|
||
|
|
WORD wDay,
|
||
|
|
RECT *prect)
|
||
|
|
{
|
||
|
|
INT ixco;
|
||
|
|
INT iyco;
|
||
|
|
INT irgb;
|
||
|
|
|
||
|
|
ixco = (irgb = vwWeekdayFirst + wDay - vmScrollPos*7 - hmScrollPos)%7 ;
|
||
|
|
iyco = irgb / 7;
|
||
|
|
if ((ixco < 0)||(ixco > 6)||(iyco < 0) ||(iyco > vcWeeksMonth))
|
||
|
|
{
|
||
|
|
prect->left = prect->right = 0;
|
||
|
|
prect->top = prect->bottom = 0;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
prect -> left = vrgxcoGrid [ixco] + vcxBorder;
|
||
|
|
prect -> right = vrgxcoGrid [ixco + 1 ];
|
||
|
|
prect -> top = vrgycoGrid [iyco] + vcyBorder;
|
||
|
|
prect -> bottom = vrgycoGrid [iyco + 1];
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** FMapCoToIGrid */
|
||
|
|
|
||
|
|
BOOL APIENTRY FMapCoToIGrid (
|
||
|
|
INT co, /* INPUT - the coordinate to map. */
|
||
|
|
INT *pco, /* INPUT - Coordinates of the grid. */
|
||
|
|
INT cco, /* INPUT - Count of coordinates in the grid. */
|
||
|
|
INT *pico) /* OUTPUT - the index of the grid coordinate. */
|
||
|
|
{
|
||
|
|
/* Note - by using co >= *pco in the loop control, we map the
|
||
|
|
the leftmost pixel of the calendar to the first column and
|
||
|
|
the topmost pixel to the first row. Then, because inside
|
||
|
|
the loop we use co <= *++pco, the rightmost and bottommost
|
||
|
|
pixels get mapped to the last column and bottom row.
|
||
|
|
A click on the border between two adjacent date boxes is
|
||
|
|
mapped to the one to the right (for vertical borders),
|
||
|
|
or bottom (for horizontal borders).
|
||
|
|
*/
|
||
|
|
|
||
|
|
for (*pico = 0; *pico < cco && co >= *pco; (*pico)++)
|
||
|
|
{
|
||
|
|
if (co <= *++pco)
|
||
|
|
return (TRUE);
|
||
|
|
}
|
||
|
|
|
||
|
|
return (FALSE);
|
||
|
|
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** DtFromPd3 - convert D3 to DT. */
|
||
|
|
|
||
|
|
DT APIENTRY FAR DtFromPd3 (D3 *pd3)
|
||
|
|
{
|
||
|
|
static INT cDaysAccum [12] =
|
||
|
|
{0, 31, 59, 90, 120, 151, 181, 212, 243, 273, 304, 334};
|
||
|
|
|
||
|
|
DT dt;
|
||
|
|
|
||
|
|
dt = (pd3 -> wYear) * 365;
|
||
|
|
|
||
|
|
/* Add in the days for the preceding leap years. */
|
||
|
|
if (pd3 -> wYear != 0)
|
||
|
|
dt += 1 + (pd3 -> wYear - 1) / 4;
|
||
|
|
|
||
|
|
/* Add in the days for the full months before the current one. */
|
||
|
|
dt += (DT)(cDaysAccum [pd3 -> wMonth]);
|
||
|
|
|
||
|
|
/* If this is a leap year and the current month is beyond February,
|
||
|
|
add in an extra day.
|
||
|
|
*/
|
||
|
|
if (pd3 -> wYear % 4 == 0 && pd3 -> wMonth > MONTHFEB)
|
||
|
|
dt++;
|
||
|
|
|
||
|
|
/* Add in the days of the current month (prior to the current one). */
|
||
|
|
dt += pd3 -> wDay;
|
||
|
|
|
||
|
|
return (dt);
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** GetMarkedDays - set the marked bits in vrgbMonth for the days
|
||
|
|
of the current month that are marked.
|
||
|
|
****/
|
||
|
|
|
||
|
|
VOID APIENTRY GetMarkedDays ()
|
||
|
|
{
|
||
|
|
D3 d3Temp;
|
||
|
|
DT dtFirst; /* First day of month. */
|
||
|
|
DT dtMax; /* Last day of month + 1. */
|
||
|
|
DT dtCur; /* Day of month of current dd. */
|
||
|
|
INT itdd; /* Index into the tdd. */
|
||
|
|
DD *pdd; /* Pointer into the tdd. */
|
||
|
|
|
||
|
|
/* Get the DTs of the first and (last + 1) days of the month. */
|
||
|
|
d3Temp = vd3Sel;
|
||
|
|
d3Temp.wDay = 0;
|
||
|
|
dtMax = (dtFirst = DtFromPd3 (&d3Temp)) + vcDaysMonth;
|
||
|
|
|
||
|
|
/* Look for the first day of the month. If it's found, itdd will
|
||
|
|
be its index. If it's not found, itdd will be the index of the
|
||
|
|
first entry in the tdd that is beyond the first day of the month.
|
||
|
|
In either case, this is the place where we start looking for marked
|
||
|
|
days within the current month.
|
||
|
|
*/
|
||
|
|
FSearchTdd (dtFirst, &itdd);
|
||
|
|
|
||
|
|
/* Lock the tdd and looking at all dates in the current month,
|
||
|
|
set their marked bits in vrgbMonth if they are marked in the
|
||
|
|
tdd.
|
||
|
|
*/
|
||
|
|
for (pdd = TddLock () + itdd;
|
||
|
|
itdd < vcddUsed && (dtCur = pdd -> dt) < dtMax; pdd++, itdd++)
|
||
|
|
/* set marked bits on each day */
|
||
|
|
if (pdd -> fMarked)
|
||
|
|
vrgbMonth [vwWeekdayFirst + (dtCur - dtFirst)] |= pdd -> fMarked;
|
||
|
|
|
||
|
|
TddUnlock ();
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
/**** MonthMode - Switch to month mode. */
|
||
|
|
|
||
|
|
VOID APIENTRY MonthMode ()
|
||
|
|
{
|
||
|
|
|
||
|
|
if (vfDayMode)
|
||
|
|
{
|
||
|
|
/* Record edits and disable focus for now. (When UpdateMonth
|
||
|
|
calls FFetchNewDate the focus should be NULL so it doesn't
|
||
|
|
get set to the wrong thing (like Wnd3)).
|
||
|
|
*/
|
||
|
|
CalSetFocus ((HWND)NULL);
|
||
|
|
|
||
|
|
/* Say we are in Month mode. */
|
||
|
|
vfDayMode = FALSE;
|
||
|
|
|
||
|
|
SetScrollRange (vhwnd2B, SB_VERT, 0, SCROLLMONTHLAST, FALSE);
|
||
|
|
SetScrollPos (vhwnd2B, SB_VERT, vd3Sel.wYear * 12 + vd3Sel.wMonth,
|
||
|
|
TRUE);
|
||
|
|
|
||
|
|
/* Hide the appointment description edit control. */
|
||
|
|
ShowWindow (vhwnd3, HIDE_WINDOW);
|
||
|
|
|
||
|
|
/* Repaint Wnd2A to display "Today is: ..." message. */
|
||
|
|
InvalidateRect (vhwnd2A, (LPRECT)NULL, TRUE);
|
||
|
|
|
||
|
|
/* Note - we are coming from View Month in CalCommand, so
|
||
|
|
vd3To == vd3Sel. This, along with setting vwDaySticky
|
||
|
|
to the current selected day will insure that the selected
|
||
|
|
date does not change when we call UpDateMonth.
|
||
|
|
*/
|
||
|
|
vwDaySticky = vd3Sel.wDay;
|
||
|
|
SetScrollPos (vhwnd2B, SB_HORZ, hmScrollPos, TRUE);
|
||
|
|
SetScrollPos (vhwnd2B, SB_VERT, vmScrollPos, TRUE);
|
||
|
|
SetScrollRange (vhwnd2B, SB_HORZ, 0, hmScrollMax, TRUE);
|
||
|
|
SetScrollRange (vhwnd2B, SB_VERT, 0, vmScrollMax, TRUE);
|
||
|
|
|
||
|
|
UpdateMonth ();
|
||
|
|
|
||
|
|
/* If the focus was in the notes area in day mode, leave it in
|
||
|
|
the notes area in month mode. Otherwise put the focus on
|
||
|
|
the calendar.
|
||
|
|
*/
|
||
|
|
CalSetFocus (vhwndFocus == vhwnd2C ? vhwnd2C : vhwnd2B);
|
||
|
|
}
|
||
|
|
}
|