ÿÿÿÿÿ 4š (HHÿÿPage1Form€Üx|,Í ±¨±í±êÌâ1Hö:0ÿÿÿÿÿÈ2Ò³½Å1|ö0ÿÿÿÿÿÈ—ҳͷ1œö&0ÿÿÿÿÿÈŠ Ö÷ÏîÊý¾Ý2ö0ÿÿÿ frDBDataSet1begin  FoundDateId := -1;  for i:=0 to IDCount-1 do  begin ! if DateIDs[i]=["DateId"] then begin 0 DateSums[i] := DateSums[i]+[TimeInterval];  FoundDateId := i; break;  end;  end;  if FoundDateId=-1 then  begin # DateIds[IDCount] := ["DateId"]; ( DateSums[IDCount] := [TimeInterval];  inc(IDCount);  end; endÈ:·Ö×éÍ·1Üö0ÿÿÿ[qryLeave1."UserId"]begin  IDCount:=0;  DataIdSummary:=''; endÈ¡·Ö×é½Å1<ö0ÿÿÿÈ2Memo19@JðCÿÿÿ.­û¤u¤½¥X/½Ð°²°O¿ýªíÿÿºÚÌåÿÿÿLine1@l,ÿÿÿ.ÿÿÐLine2@h,ÿÿÿ.ÿÿ[Memo200R€Cÿÿÿ. [ReportRange]ÿÿËÎÌå ÿÿÿªLine4A€ƒÿÿÿ.ÿÿ.Memo21L„ôSÿÿÿ.¨îªí¡GÿÿËÎÌå ÿÿÿ»Memo22t„„Cÿÿÿ.[Administrator]ÿÿËÎÌå ÿÿÿNMemo23„¨Cÿÿÿ.['²Ä '][PAGE#][' ­¶']ÿÿËÎÌå ÿÿÿÒMemo24„tCÿÿÿ.[DATE]ÿÿËÎÌå ÿÿÿ¸ Memo25ÌRìCÿÿÿ.h[FORMATDATETIME('yyyy-mm-dd', [ReportStartDate])][' ¦Ü '][FORMATDATETIME('yyyy-mm-dd', [ReportEndDate])]ÿÿËÎÌå ÿÿÿA Memo3<°\ÿÿÿ.é_ʼ•régÿÿ·s²Ó©úÅé †ÿÿÿæ Memo4<\ÿÿÿ,yy-mm-dd hh:nn[qryLeave1."STARTSPECDAY"]ÿÿËÎÌå ÿÿÿk Memo6˜°\ÿÿÿ.½YÊø•régÿÿËÎÌå †ÿÿÿ Memo13˜\ÿÿÿ,yy-mm-dd hh:nn[qryLeave1."ENDSPECDAY"]ÿÿËÎÌå ÿÿÿ‘ Memo16,°@ÿÿÿ.Ô­ÒòÿÿËÎÌå †ÿÿÿ# Memo17,@ÿÿÿ.[qryLeave1."DATEID"]ÿÿËÎÌå ÿÿÿ¥ Memo18l°Tÿÿÿ.­ì¦]ÿÿËÎÌå †ÿÿÿ9Memo26lTÿÿÿ.[qryLeave1."YUANYING"]ÿÿËÎÌå ÿÿÿˆLine5=ƒÿÿÿ.ÿÿMemo1<äxÿÿÿ.[qryLeave1."Name"]ÿÿËÎÌå ÿÿÿ­Memo2¼äxÿÿÿ.[qryLeave1."BadgeNumber"]ÿÿËÎÌå ÿÿÿ<Memo5<<hÿÿÿ.[qryLeave1."Name"]ÿÿËÎÌå ÿÿÿÒMemo7¤<lÿÿÿ.[qryLeave1."BadgeNumber"]ÿÿËÎÌå ÿÿÿkMemo8& ÿÿÿ,hh:nn[TimeInterval/(24*60)]ÿÿArial ÿÿÿ Memo9ðC ÿÿÿ,hh:nnnt(TimeInterval/(24*60))]ÿÿArial ÿÿÿ‹Memo10ô°8ÿÿÿ.®ÉªøÿÿËÎÌå †ÿÿÿïMemo11<°ÿÿÿ.[DataIdSummary]begin A DataIdSummary := DateIds[0]+':'+STR(int(DateSums[0]/6)/10)+' ';  for i := 0 to IDCount-1 do  begin Q DataIdSummary := DataIdSummary+' '+DateIds[i]+':'+STR(int(DateSums[i]/6)/10);  end; endËÎÌå ÿÿÿþþÿ Var1IDCountDateIDs TimeIntervalBround(([qryLeave1."ENDSPECDAY"]-[qryLeave1."STARTSPECDAY"])*24*60)DateSums DataIdSummary qryLeave1 qryLeaveClassqryLeaveClass2qryLeaveüX0°f޶â@Ñ Æn&ã@