Re: Was befindet sich in eurer Zwischenablage?

[Errraddicator Registriert seit: 18.10.2004 Beiträge: 17,759]

/*— read the missing data for this staff —*/
TDateTime minDate, maxDate;
// current year
minDate = „01.01.“ + AnsiString(getDateYear(curDate) );
maxDate = curDate;
curStaff->curYear = getYearData(curStaff->employeer, curStaff->number, minDate, maxDate);
// previous month
minDate = prevDate;
maxDate = prevDate;
curStaff->prevMonth = getYearData(curStaff->employeer, curStaff->number, minDate, maxDate);
// previous year
minDate = „01.01.“ + AnsiString(getDateYear(prevDate) );
maxDate = prevDate;
curStaff->prevYear = getYearData(curStaff->employeer, curStaff->number, minDate, maxDate);

--